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PART 1 
GAINING ACCESS 

An APIA 360 System comprises a central computer and an in- 
definite number of typewriter- like terminals! A certain number of 
these terminals may be simultaneously linked to the computer, 
according to the number and type of access ports on the computer. 

This part of the manual describes the terminal equipment 
required for interacting with the system, tells how to establish a 
connection between a terminal and the central computer, and gives, 
in simplest form, the procedures for starting and ending a work 
session. 

PHYSICAL EQUIPMENT 

A remote terminal for use with the system must be either an 
IBM 2741 Communications Terminal, an IBM 2740-1 Communications 
Terminal equipped with the Transmit Control feature, or an IBM 
1050 Teleprocessing Terminal. It may connect to the central com- 
puter through the dial-up telephone network, by a leased telephone 
line, or by private wire. 

Dial-up connections are effected by means of a Western Elec- 
tric Dataset #103A-2 or the equivalent, or a compatible acoustic 
coupler. A leased telephone line connection requires the use of a 
Western Electric Dataset #103F-2 or the equivalent. A direct- 
wired connection is effected by means of an appropriate IBM line 
adapter (modem) . In the last case, two-wire connections should be 
avoided, if possible, since their use rules out an interrupt 
facility. 

P?§f§££§£ features. The APIA360 system will work with many varia- 
tions of the terminal types given above, but certain features and 
options are desirable. Dial-up connections provide the greatest 
flexibility, both in overall system configuration, and in certain 
details of operation. Similarly, although the APL printing element 
is based on a 12-pitch font, and is available in both Selectric® 
and PTTC/BCD keyboard encoding (i.e., the correspondence between 
keyboard layout and character positions on the printing element) , 
specification of 10-pitch character spacing and Selectric® encoding 
will allow a greater variety of printing elements to be used with 
the terminal. While it is not essential, the convenience of 
having the interrupt feature cannot be overestimated. 

Paper tape equipment (1054-1 Reader and 1055-1 Punch) and 
punched-card equipment (1056-1 Reader and 1057-1 Punch) can be 
used with IBM 1050 terminals. The punched-card facilities should 
have Extended Character features 3861 and 3860, for reader and 
punch, respectively. 
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IBM identifications for recommended terminal features and 
options are given in Table 1.1. Complete specifications for ter- 
minals, and information on other options, should be obtained from 
local IBM representatives. 



FEATURE OR OPTION 



Control Unit 
Voltage (115 AC) , Non-lock plug 
Dataset Attachment 
Dial Up 

Transmit Control 
Automatic EOB 
Typamatic Keys 
Interrupt 

Text Time-out Suppression 
First Printer Attachment 
Automatic Ribbon Shift Select 
Typing Table 

Printer-Keyboard 
APL Printing Element, PTTC/BCD 

or Standard Selectric® 
Keys, APL Keyboard 
Character Spacing, 10 per inch 
Line Feeding, 6 per inch 
Accelerated Carrier Return 



1050 



1051-2 
9881 
9114 
NR 
NR 

RPQ E27283 
NA 

RPQ E27428 
9698 
4408 
1295 
9705 

1052-2 
1167988 
NA 

RPQ M40174 
9104 
9435 
1006 



2740-1 



9881 

9114 

3255 

8028 

Do not use 

NA 

RPQ F17913 

NR 

NR 

NA 

NR 

1167988 

1167987 

RPQ M40174 

9104 

9435 

NA 



2741 



9881 

9114 

3255 

NR 

NR 

8341 

4708 

NR 

NR 

NA 

NR 

1167988 

1167987 

RPQ M40174 

9104 

9435 

NA 



Notes. NR: feature is standard equipment, or is not required, 
NA: not available. 
The numbers are IBM^-domestic identifications. 
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THE APL CHARACTER SET 

The APL\360 keyboard is shown in Figure 1.2. The numerals, 
alphabetic characters, and punctuation marks appear in their 
usual places, although the alphabet is used in only a single case: 
letters print as upper-case italics, but are produced only when 
the keyboard is in lower-case position (i.e., not shifted). 

The special characters, most of which are produced with the 
keyboard shifted, generally have some mnemonic connection with 
their alphabetic or numeric correspondents. This may be appearance 
(w over W) , Greek-Roman equivalence (p over R) , sequence 
(<<=>>* over 3 4 5 6 7 8), or some -- possibly far fetched 
— relationship between the APL function represented by the symbol 
and the letter (* over P for power, ' over K for "kwote", and 
f over S for ceiling) . " — 
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Figure 1.2: KEYBOARD 



Use of other character sets. The part numbers of APL printing 
elements are given in Table 1.1. However, any printing element 
may be used with the APL system, since the encoded characters 
generated by the keyboard and transmitted to the computer are 
independent of the particular element mounted on the terminal. 
Subject to programmed intervention, the transmitted information 
will always be interpreted according to the APL keyboard charac- 
ters. 

Non-APL printing elements are frequently useful in conjunc- 
tion with special-purpose APL programs designed to exploit their 
character sets. Also, any element that matches the keyboard en- 
coding (Selectric® or PTTC/BCD) of the terminal can be used for 
straightforward numerical work, since letters and digits print 
properly with such elements. The visual interpretation of complex 
APL expressions is, of course, awkward with any but an APL print- 
ing element. 

THE RECORDING TERMINAL 

As connections with remote terminals are established and 
broken, and users start and end work sessions, a printed record of 
this traffic is generated at the system's recording terminal. This 
terminal, which is usually, but not necessarily, Iocate3 at the 
central computer site, is ordinarily attended by an APL Operator 
who monitors the operation of the system, and provides a common 
point of contact for users. 

There are certain supervisory functions, essential to the 
operation of APL\360, which can be effected only from the record- 
ing terminal. Thus, this terminal holds a privileged position 
relative to others. The enrollment of new users, and the alloca- 
tion of library space, are examples of this kind of function. 

ESTABLISHING A CONNECTION 

The directions that follow assume the use of a dial-up con- 
nection with a dataset. Instructions for the use of acoustic 
couplers should be obtained from their suppliers. Where terminals 
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are connected to the computer by leased lines or private wires, 
instructions on dialing procedure (EC2) are irrelevant, but local 
sources of information should be consulted for equivalent pro- 
cedures. 



ACTION 

ECl. Set up terminal: 
Insert paper, mount an APL 
printing element, connect 
terminal to power source, 
and set switches as follows: 

IBM 2741 or 2 740 Terminal 

LCL/COM COM 

Power ON 



IBM 1050 Terminal 



ATTEND/UNATTEND 


ATTEND 


Keyboard 


SEND 


Printer 


SEND-RECEIVE 


Reader 1 


OFF 


Punch 1 


OFF 


EOB 


MANUAL 


Line; test 


OFF 


Single step 


OFF 


Line control 


ON 


Power 


ON 



On 2741 and 2740 terminals, 
test to see if the keyboard 
is locked by trying the 
shift key. If the key is 
operable, press the carrier 
return and test again. 

EC2. Dial computer: 
Set the telephone~pushbutton 
switch to TALK and follow 
ordinary dialing procedure. 
After two rings, at most, 
the telephone will respond 
with a steady, high-pitched 
tone. 



NOTES 



The power switch is at the right of 
the keyboard. On 2741 's, the~LCL/ 
COM switch is on the left side of 
the terminal stand, toward the rear; 
on 2740' s, it is to the right of the 
power switch. 



Not all 1050 's have all switches; 
those present must be set as indica- 
ted. The states of switches not 
listed here are immaterial. 

If it is known that RPQ E27283 (see 
Table 1.1) is installed, set the EOB 
switch to AUTO. 

The line control switch is inside the 
rear door of the 10 51 Control Unit. 
The power switch is on the left side 
of the control unit, toward the 
front. 

If the keyboard does not lock after 
a carrier return, check the 
switches and try once more. If the 
switches are set properly and the 
keyboard remains unlocked, the ter- 
minal is faulty. 

Telephone numbers are given in Table 
1.3. If the line is busy, try a 
different number or call the APL 
Operator to inquire about an open 
line. 



123 456-7890 123 456-7890 

Insert a table of access 

telephone numbers here. 

An assistance number 

should be included. 

APL Operator: 123-456-7890 



Table 1.3: TELEPHONE NUMBERS 
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Promptly set the pushbutton The DATA button should light, and 
switch to DATA by holding will remain lit as long as the ter- 
the DATA button down firmly minal is connected to the computer, 
for a moment and then If it does not light, check the 
releasing. power connection to the dataset. If 

it lights, but quickly goes out, 
Cradle the handset. check the power connection to the 

terminal, the cable connection to 
the dataset, and the switch settings 
on the terminal. Then retry from 
EC1. 

Response: The keyboard 
will unlock, indicating that 
the computer is ready to 
accept an entry from the 
terminal . 

The connection established by the foregoing procedure is only 
tentative, and will be broken by the central computer if further 
communication does not take place within 60 seconds. Therefore, 
the next step — the sign-on procedure (EC3) given below — should 
be executed promptly. 

ENTRIES FROM THE KEYBOARD 

After a connection is established, normal communication be- 
tween a terminal and the central computer is carried on by means 
of entries from the typewriter keyboard, which alternately locks 
and unlocks as each entry is made and the computer completes its 
work. The general procedure is to type an instruction or command, 
strike the carrier return to indicate the end of the message, and 
follow this by" a transmission signal. 

Transmission signals. The transmission signal is generated dif- 
ferently, "according to the terminal type and its equipment: 

2741. A transmission signal is automatically generated in the 
proper sequence (i.e., after the carrier return signal) when 
the RETURN key is struck. 

2740. The transmission signal is produced by striking the EOT 
key "after the RETURN key. (Do not use the EOB key, or the 
automatic EOB feature available on these terminals.) 
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1050. On terminals equipped with an automatic EOB RPQ (see 
Table 1.1) , the transmission signal is produced automatically 
when the RETURN key is struck. Otherwise, an EOB must be pro- 
duced manually, by striking the numeral-5 key, while the key 
marked ALTN CODING is held down. (Note that the automatic EOB 
feature available for 1050 terminals cannot be used with APIA 
360.) 

A transmission signal does not cause a character to be printed, 
and its omission will therefore be evidenced only by the state of 
the terminal: the keyboard will remain unlocked, and no response 
will be forthcoming from the system. 

In the remainder of this manual the need for carrier return 
and transmission signal will not be explicitly mentioned, since 
they are required for every entry. 

Mistakes. Before the carrier return (and transmission signal) 
that completes an entry, errors in typing can be corrected as 
follows: backspace to the point of error and then depress the 
ATTN button (marked LINE FEED on 2740 and 1050 terminals) . This 
will have the effect of erasing everything to the right of, and 
including, the position of the carrier. The corrected text can 
be continued from that point, on the new line. 

This procedure can be used at any time once the sign-on 
(EC3) has been accomplished. In case of error in the sign-on 
itself, the entry should be made as is. The system will provide 
an appropriate trouble report, following which, a correct entry 
may be made. 

Transmission errors. There are occasional transient failures in 
the communication between a terminal and the central computer. If 
the failure occurs during the transmission from the terminal, the 
system will respond with a re send signal: on 1050 terminals, the 
RESEND warning light will go on, and on other terminals the message 
RE SEND will be printed. In any case, the last entry from the 
keyboard must be repeated. The warning light on the 1050 should 
first be extinguished by pressing the adjacent button. 

Failures in the other direction are usually evidenced by 
the appearance of a spurious character, whose presence in the 
printed output is obvious in most contexts. However, there is no 
absolutely certain way of detecting such a failure. 
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Special features of IBM 1050 terminals. The keyboard of a ter- 
minal equipped with a REQUEST button will not unlock, when it 
otherwise should, until the button is depressed. On terminals 
equipped with a timer, the keyboard will lock before an entry is 
completed if approximately 18 seconds have elapsed since the last 
keyboard action. Locking can be forestalled by occasionally 
striking the shift key, but if it does happen, the keyboard can be 
forced to unlock by flipping the line-control switch inside the 
1051 Control Unit to OFF, and back to ON. 

If a terminal is to be used exclusively with APIA360, the 
Keyboard Request feature should be removed, and the Text Time-out 
Suppression feature should be added. 

STARTING AND ENDING A WORK SESSION 

Each user of the system is assigned an account number. This 
number is used to effect the sign-on that initiates a work session; 
serves to partially identify any work that the user may store in 
the system between sessions; and is used for accounting or billing 
purposes. 

If the account number is not known, or if one of the trouble 
reports given below is encountered and not understood, a message 
of inquiry can be sent to the APL Operator. This is accomplished 
by entering )0PR followed by a space and one line (not exceeding 
120 characters) of an appropriate text. 

Such a message can be sent at any time after a connection has 
been established. It causes the keyboard to lock, awaiting a 
reply. If no reply is forthcoming, (and the sign-on has not been 
completed) , the connection will have to be broken and 
re-established before further communication with the system is 
possible. (After the sign-on, the keyboard may be unlocked by 
an attention signal, described in Part 2.) 



ACTION 



NOTES 



EC 3. Sign on: 

Enter ) 

followed by an account 

number, with a colon and 

password if required. 

Effect: 

1. A workspace will be 
activated for the terminal. 

2 . Accumulation of time 
charges will begin. 



The use of passwords is described 
in Part 2. A new user will have 
been advised if a password is 
required for his first sign-on. 



A workspace can be thought of as 
both a notebook and a scratch pad. 
The details are explained in Part 2. 
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Response: 

1. A broadcast message from 
the APL Operator may be 
printed. 

2. The port number, time of 
day, date, and user name 
associated with the account 
number will be printed on 
one line. The system 
identification will be 
printed on another line. 



Trouble ?§E°?ts: 

No message Is printed and the key- 
board unlocks. This means that the 
first character entered was not a 
right parenthesis. APL cannot print 
a message because it needs the right 
parenthesis character to determine 
what kind of terminal is being 
used. Reenter the sign-on, pre- 
ceding it with a right parenthesis. 

NUMBER NOT IN SYSTEM 

means either exactly what it says, 

or that the number has a password 

associated with it and the wrong 

password was used. The APL Operator 

should be consulted if help is 

required. 

INCORRECT SIGN-ON 
means the form of the transmitted 
command was faulty. Retry with a 
properly formulated sign-on. 

ALREADY SIGNED ON 

means that a work session is already 
in progress at the terminal. To 
start a session with a different 
account number, use command TC5 
(see Part 2) , which ends the current 
session but holds the connection, 
and retry from the beginning of 
EC3. 



3. SAVED, followed by the 
time of day and date that 
the activated workspace was 
last stored. 



NUMBER IN USE 

means just that, or a temporary 
condition due to delays in the cen- 
tral computer. Retry from EC2 
after two minutes, if the condition 
persists, notify the APL Operator. 

NUMBER LOCKED OUT 

means that authorization for use 

of that number has been withdrawn. 

This response will be omitted if 
the activated workspace is clear 
(i.e., not holding information). If 
the response is given, the workspace 
is named CONTINUE. The use of 
workspace names is explained in 
Part 2. 
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4. The keyboard will be If this is the only response, a 
unlocked. transmission error has occurred, or 

the entry did not start with an APL 
right parenthesis. In either case, 
the entry should be repeated in 
correct form. If the condition 
persists, retry from EC2, possibly 
dialing a different number. 

A work session is started, and the full APL system becomes 
available, once the sign-on is accomplished. Any system command 
of Part 2 or APL operation of Part 3 may now be entered for 
execution. 

■kiEit:?^ Use 2? the_ s y!it? m .• No s y stem command other than the 
sign-on given here Is required in order to make use of Part 3, 
and the reading of Part 2 may therefore be deferred if only 
casual or restricted use is to be made of the system. For the 
purposes of such use, a work session may conveniently be termi- 
nated by one of the following procedures: 

ACTION NOTES 

EC4. Disconnect dial-up con- Use this procedure for dial-up 
nection: ~~ connections only. 

Set the power switch to OFF. 

Effect: 

1. The active workspace If the workspace is clear, it will 
will be stored under the not be stored at this time. If it 
name CONTINUE. is stored, it will be automatically 

re-activated when the same account 
number is next used to sign on. 
See note for EC3, Response 3. 

2. The duration of the work 
session and the amount of 
computer time used will be 
noted internally for later 
accounting. 

3. The connection to the 
central computer will be 
broken. 

Response: None. The DATA light will go out. 

EC5. Break any_ connection: This is command TC4, detailed in 
Enter ) CONTINUE Part 2. 

Effect: 

1. 2. and 3. The same as 

for EC4, 
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Resgonse: 

1. Time of day and date, 

followed by CONTINUE 



2. The port number, time of 
day, date, and user code 
will be printed. 

3. Accounting information 
will be printed. 



Trouble £§E°£t§_ : 

NOT WITH OPEN DEFINITION 
INCORRECT COMMAND 

The meanings of these reports, and 
corrective actions for them, are 
given in Part 2. 

User codes comprise three charac- 
ters which partially identify 
users. Their use is explained in 
Part 2. 

If a dial-up connection is being 
used, the DATA light will go out. 
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PART 2 
SYSTEM COMMANDS 



APL operations deal with transformations of abstract objects, 
such as numbers and symbols, whose practical significance, as is 
usual in mathematics, depends upon the (arbitr ary) interpretation 
placed upon them. System commands in the APIA360 System, on the 
other hand, have as'theli lubjict the structures which comprise 
the system, and control functions and information relating to the 
state of the system, and therefore have an immediate practical 
significance independent of any interpretation by the user. 

In this Part the structure of the APIA360 system is described, 
and various notions essential to the understanding of system 
commands are introduced. Finally, the complete set of system com- 
mands is described in detail. 

WORKSPACES AND LIBRARIES 

Workspaces. The common organizational unit in the APIA 360 system 
Is~the workspace. When in use, a workspace is said to be 3^e, 
and it o5cupiei~a block of working storage in the central com- 
puter. The size of the block, which is preset at a fixed value 
for a given system, determines the combined working and storage 
capaci?J of each workspace in that system. Part of each work- 
space il set aside to lerve the internal workings, of the system, 
and the remainder is used, as required, for storing items of in- 
formation and for containing transient information generated in 
the course of a computation. 

An active workspace is always associated with a terminal 
during a work session, and all transactions with the system are 
mediated by it. In particular, the names of yari|felgs. (data 
items) and defined functions (programs) used in ^ lc ^^J on ;L rk _ 
alwavs refer to objects known by those names m the active work 
space;. information on the progress of program execution is main- 
tained in the state indicator of the active workspace; and con- 
tJSinSrmation-ifficting-the form of output is held within the 
active workspace. 

Libraries. Inactive workspaces are stored in libraries, where 
thiy~are~identified by arbitrary names. They occupy space in 
secondary storage facilities. of the central computer and cannot 
be worked with directly. When required, copies of stored work- 
spaces can be made active, or selected information may be copied 
from them into an active workspace. 
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Libraries in APIA 360 are either private or public. Private 
libraries are associated with individual users of the system, and 
are identified by the user's account number. Access to them by 
other users is restricted in that one user may not store work- 
spaces in another person's library, nor can he obtain a listing of 
the workspaces already stored there. However, one user may acti- 
vate a copy of another user's (unlocked) workspace that is not 
password-protected if he knows the library number and workspace 
name . r 

Public libraries are identified by numbers below 1000. They 
are not associated with individual users, although certain ones 
may be reserved by general agreement for groups of people working 
cooperatively. Anyone may store workspaces in a public library, 
and a listing of workspace names is available upon request if the 
library number is known. However, a workspace stored in a public 
library remains under the control of the user who put it there, 
and cannot be altered by others. 

NAMES 

Names of workspaces, functions, variables, and groups may 
be formed of any sequence of alphabetic (A to Z, and A to Z) and 
numeric (0 to 9) characters that starts with an alphabetic and 
contains no blank. Only the first 11 characters of workspace 
names, and the first 77 characters of other names are significant. 
Longer names may be used, but additional characters beyond these 
limits are ignored. 

The environment in which APL operations take place is bounded 
by the active workspace. Hence, the same name may be used to 
designate different objects (i.e., groups, functions or variables) 
in different workspaces, without interference. Also, since work- 
spaces themselves are never the subject of APL operations, but 
only of system commands, it is possible for a workspace to have 
the same name as an object it holds. However, the objects within 
a workspace must have distinct names, except as explained below. 

k°9.al..and alo^al significance. In the execution of defined 
functions it is often necessary to work with intermediate results 
which have- no significance either before or after the function is 
used. To avoid cluttering the workspace with a multitude of 
variables introduced for such transient purposes, and to allow 
greater freedom in the choice of names, the function definition 
process (see Part 3) provides a facility for designating certain 
variables as local to the function being defined. Variables not 
so designated, and all functions and groups, are said to be global. 

A local variable may have the same name as a global object, 
and any number of variables local to different functions may have 
the same name. 
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During the execution of a defined function, a local variable 
will supersede a function or global variable of the same name, 
temporarily excluding it from use. If the execution of a function 
is interrupted (leaving it either suspended, or pendent, see Part 
3), the local variables retain their dominant position, during 
the execution of subsequent APL operations, until such time as 
the halted function is completed. System commands, under these 
circumstances, continue to reference the global homonyms of local 
variables. 



PASSWORDS 

Stored workspaces and the information they hold can be pro- 
tected against unauthorized use by associating a password of the 
user's choice, with the name of the workspace, when the workspace 
is stored. To activate a password-protected workspace or copy 
any information it contains, a colon and the password must again 
be used in conjunction with the workspace name. Listings of 
workspace names, including those in public libraries, never give 
the passwords, and do not overtly indicate that the workspace is 
password-protected . 

Account numbers can be similarly protected by passwords, 
thus maintaining the security of a user's private library and 
avoiding unauthorized charges against his account. 

Passwords may be formed of any sequence of alphabetic and 

numeric characters up to eight characters long, without blanks. 

Characters beyond the eighth are ignored. In use, a password 

follows the number or name it is protecting, from which it is set 
off by a colon. 

ATTENTION 

Printed output at a terminal can be cut off, or the execution 
of an APL operation can be interrupted, and control returned to 
the user, by means of an attention signal. Since the keyboard is 
locked during printing or computing, the signal must be generated 
by means other than one of the standard keys. 

On terminals equipped with an interrupt feature, the atten- 
tion signal is generated by depressing the appropriate key once, 
firmly. On IBM 2741 terminals this key is usually of a distinctive 
color, and is marked ATTN. (The same key is used for linefeed 
when the keyboard is not locked.) 

For terminals not so equipped, the attention signal is gen- 
erated by momentarily interrupting the connection to the central 
computer. The method depends upon the type of connection: 

with dial-up telephones, uncradle the handset, set 

the pushbutton switch to TALK for two to three seconds, 

and then reset it to DATA; 
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with leased telephone lines, set the terminal power 
switch to OFF and then back to ON, with deliberate 
speed. 

If the connection is broken, in either case, for more than five 
seconds, the central computer will interpret this as a signal to 
end the work session and will execute action EC4 of Part 1. 

Following an attention signal the keyboard will unlock, 
and the type carrier will return to the normal position for input 
(six spaces from the left margin) . If the carrier does not do 
this, enter blank lines repeatedly until it does. In some cases a 
line will be printed before the keyboard unlocks, telling where a 
function in progress was interrupted. Occasionally, line noise 
generates a spurious attention signal, which unlocks the keyboard 
and interrupts an executing function. If this happens, normal 
operation is resumed by branching to the point of function 
interruption (see "Suspended Function Execution"). 

Except for communication commands (and then only if the 
delivery of a message is delayed) , the execution of system com- 
mands, once entered, cannot be interrupted. However, the printed 
responses or trouble reports following a system command can be 
suppressed by a properly timed attention signal. 

Execution can be suspended within an APL statement by signaling 
attention twice in quick succession. An INTERRUPT error report 
is printed at the terminal. The error report will be followed by 
the statement with a caret typed under the point in the statement 
where execution was halted. Execution of the function may be 
resumed by branching to the statement within which execution was 
suspended. 

USE OF SYSTEM COMMANDS 

System commands and APL operations are distinguished 
fictionally by the fact that system commands can be called for 
only by individual entries from the keyboard, and cannot be 
executed dynamically as part of a defined function. They are 
distinguished in form by the requirement that system commands be 
prefixed by a right parenthesis, which is a syntactically invalid 
construction in APL. ' 

There is some system control which it may be desirable to 
exert dynamically, and there are some items of system information 
which can be profitably used during the execution of a program. 
For these purposes APL\360 provides appropriate system-dependent 
lotions and library functions, which can be used~lIke~otEer _ APL 
operations. These functions are described in Part 3 and Part 4 
respectively. Where a system command duplicates the action of ' 
one of them, this fact will be noted in the description of the 
system command in this Part. 



2.4 



All system commands can be executed when the terminal is in 
the execution mode, in which APL operations are executed forthwith 
upon entry. However, in definition mode, in which sequences of 
operations are being composed into functions for later execution, 
commands which call for storing a copy of the workspace, or which 
might otherwise interfere with the definition process itself, are 
forbidden. (The two terminal modes are treated more fully in 
Part 3.) 

Classification of commands. System commands are conveniently 
grouped into five classes with regard to their effect upon the 
state of the system: 

1. Terminal control commands affect the relation of a ter- 
minal to the system. 

2. Workspace control commands affect the state of the active 
workspace. 

3. Library control commands affect the state of the 
libraries . 

4. Inquiry commands provide information without affecting 
the state~5f the system. 

5. Co mmu nication commands effect the transmission of 
messages among terminals. 

The text that follows is based upon this classification, 
although it will be seen that certain of the terminal control com- 
mands also affect the libraries, and one of the library control 
commands may sometimes affect the state of the active workspaces. 

Normal responses and trouble reports,. Any entry starting with a 
rlght"parenthesis will be interpreted by the system as an attempt 
to execute a system command. When the command is successfully 
executed, the normal response, if any, will be printed. The 
expected response~is given with the description of each command. 

If, for any reason, a command cannot be executed, an 
appropriate trouble report will be printed. The most common 
report is INCORRECT COMMAND. This means that the command was 
incomplete, misspelled, used a wrong modifier, or was other- 
wise malformed. The corrective action in every case is to 
enter a properly composed command. The meanings and corrective 
actions for other trouble reports are given in the notes accom- 
panying the description of each command. 

Clear workspace. There are certain transient failures of the 
sy it em - which" cause the active workspace to be destroyed. If_ 
this should occur, the message CLEAR WS will be printed, indicating 
that the active workspace has been replaced by a clear workspace. 
(The attributes of a clear workspace are given in the section on 
workspace control commands, see WC1.) This situation rarely 
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arises, but the probability of its occurrence is slightly higher 
during the execution of system commands. 

Summary. The purposes, forms, responses, and trouble reports for 
all system commands are summarized in Table 2.1. Where the first 
word of a command form is more than four characters long, only 
the first four are significant. The others are included only for 
mnemonic reasons, and may be dropped or replaced, as desired. For 
example, )CLEAR, )CLEA, )CLEAVER, etc., are all equivalent. 

In general, the elements of a command form must be separated 
by one (or more) spaces. Spaces are not required immediately 
following the right parenthesis, or on either side of the colon 
used with passwords, but can be used without harm. 

TERMINAL CONTROL COMMANDS 

There is one command for starting a work session, and there 
are four commands for ending one. The variations in ending allow 
for automatically storing a copy of the active workspace, and 
for holding a dial-up telephone connection to the central computer 
for an immediate start of another work session. The starting com- 
mand has been described in Part 1 (EC3) . 

Forced §™*ings. Any action that interrupts a telephone connection 
for more than five seconds will cause the work session to end, and 
usually cause a copy of the active workspace to be stored. This 
provides a safeguard against loss of work in case of failure in 
the telephone circuits, or accidental loss of power at the ter- 
minal. It is also the basis of the disconnect action described 
in EC4 of Part 1. 

A work session can also be stopped remotely, from the system's 
recording terminal, in an action known as a bounce. As in a dis- 
connect, a copy of the active workspace is usually stored auto- 
matically. The bounce may be used when a port is required for a 
special purpose, or to clear the system of all users before stop- 
ping the APL\360 operation completely. 

If a work session is ended because of failure of the central 
computer, the active workspace is not stored. 

The CONTINUE workspace. When the active workspace is stored 
automatically, as a result of a disconnect, bounce, or one of the 
continue commands described below, it goes into the user's private 
library and is given the name CONTINUE. If the active workspace 
had a password associated with it, CONTINUE will be protected 
with the same password. 

If CONTINUE is automatically stored, and is not password- 
protected, it will be automatically activated at the next sign- 
on; otherwise, a clear workspace is activated. 
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Reference and Purpose 
COMMAND FORM 1,2,3 



NORMAL RESPONSE 



TROUBLE REPORTS* 



TCI Sign on designated user and start a work session. 

)NUMBER [PASSWORD] [TEXT]; PORT, TIME, DATE, USER; SYSTEM; [SAVED, TIME, DATE] 12 3 4 5 

TC2 End work session. 

)0FF LPASSWORD] PORT, TIME, DATE , USER CODE;TIME USED 16 

TC3 End work session and hold dial-up connection. 

)OFF HOLD [PASSWORD] PORT, TIME, DATE , USER CODE;TIME USED 16 

TC4 End work session and store active workspace. 

)CONTINUE [PASSWORD] [ TIME, DATE, CONTINUE ] ; PORT, TIME, DATE, USER CODE; TIME USED 6 16 

TC5 End work session, store active workspace, and hold dial-up connection. 

)CONTINUE HOLD [PASSWORD] [TIME, DATE, CONTINUE] ; PORT, TIME, DA TE, U SER CODE; TIME USE D 6 16 



WC1 Activate a clear workspace 

) CLEAR CLEAR WS 

WC2 Activate a copy of a stored workspace. 

)LOAD WSID [PASSWORD] SA VED , TIME , DATE 
WC3 Copy a global object from a stored workspace. 

)C0PY WSID [PASSWORD] NAME SAVED , TIME, DATE 
WC3a Copy all global objects from a stored workspace. 

)COPY WSID [PASSWORD] SA VED , TIME , DATE 
WC4 Copy a global object from a stored workspace, protecting active workspace. 

)PC0PY WSID [PASSWORD] NAME SAVED, TIME, DATE 
WC4a Copy all global objects from a stored workspace, protecting active workspace 

)PC0PY WSID [PASSWORD] SAVED , TIME, DATE 
WC5 Gather objects into a group. 

)GROUP NAME[S] NONE 

WC6 Erase global objects. 

) ERASE NAME[S] 
WC7 Set index origin for array operations. 

)0RIGIN INTEGER, 0-1 WAS, FORMER ORIGIN 
WC8 Set maximum for significant digits in output. 

)DIGITS INTEGER, 1-6 WS, FORMER MAXIMUM 
WC9 Set maximum width for an output line. 

)WIDTH INTEGER, 30-130 WS, FORMER WIDTH 
WC10 Change workspace identification. 

)WSID WSID WS, FORMER WSID 

WC11 Change quantity of permitted symbols. 

) SYMBOLS INTEGER, 26-4241 MS, FORMER SYMBOL TABLE SIZE 
LCI Re-store a copy of the active workspace. 

)SAVE TIME, DATE, WSID 

LCla Store a copy of the active workspace. 

)SAVE WSID [LOCK] TIME, DATE 

LC2 Erase a stored workspace. 

)DR0P WSID TIME, DATE 



TROUBLE REPORT FORMS 

NUMBER NOT IN SYSTEM 

INCORRECT SIGN-ON 

ALREADY SIGNED ON 

NUMBER IN USE 

NUMBER LOCKED OUT 

NOT WITH OPEN DEFINITION 

WS NOT FOUND 

8 WS LOCKED 

9 OBJECT NOT FOUND 

10 WS FULL 

11 NOT GROUPED, NAME IN USE 
NOT SAVED, WS QUOTA USED UP 
NOT SAVED, THIS WS IS WSID 
IMPROPER LIBRARY REFERENCE 

15 MESSAGE LOST 

16 INCORRECT COMMAND 



12 

13 
14 



IQ1 List names of defined functions 

)FNS [LETTER] FUNCTION NAMES 

IQ2 List names of global variables. 

)VARS [LETTER] VARIABLE NAMES 

IQ3 List names of groups. 

)GRPS [LETTER] GROUP NAMES 

IQ4 List membership of designated group. 

)GRP NAME FUNCTION NAMES (VARIABLE NAMES 

IQ5 List halted functions (state indicator). 

)SX SEQUENCE OF HALTED FUNCTIONS 

IQ6 List halted functions and associated local variables (augmented state indicator) . 

)SIV SEQUENCE OF HALTED FUNCTIONS WITH NAMES OF LOCAL VARIABLES 

IQ7 Give identification of active workspace. 

)WSID WSID 

IQ8 List names of workspaces in designated library. 

)LIB [NUMBER] NAMES OF STORED WORKSPACES 

IQ9 List ports in use and codes of connected users. 

)P0RTS PORT NUMBERS AND ASSOCIATED USER CODES 

IQ10 List port numbers associated with designated user code. 

) PORTS CODE PORT NUMBERS 



16 

7 8 16 

7 8 9 10 16 

6 7 8 10 16 

7 8 9 10 16 
6 7 8 10 16 

11 16 
16 
16 
16 
16 
16 
16 



12 13 14 16 

12 13 14 16 

7 14 16 



16 
16 
16 
16 
16 
16 
16 
14 16 
16 
16 



CM1 Address text to designated port. 

)MSGN PORT [TEXT] SENT 

CM2 Address text to designated port, and lock keyboard. 

)MSG PORT [TEXT] SENT 

CM3 Address text to recording terminal (APL Operator) . 

)0PRN [TEXT] SENT 

CM4 Address text to recording terminal (APL Operator) , and lock keyboard. 

)0PR [TEXT] ^__^ SENT _ 

Notes: T. Items in brackets are optionaX. 

2. PASSWORD: a password set off from preceding text by a colon. 

3. WSID: library number and workspace name, or workspace name alone, as required. 

4. See insert table of trouble report forms. 



15 16 
15 16 
15 16 
15 16 



Table 2.1: SYSTEM COMMANDS 
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Since CONTINUE will replace any workspace that may have been 
previously stored under that name, there is a danger that repeated 
line failures, while working with a password-protected workspace, 
could lead to a complete loss of information. To protect against 
this possibility, a clear workspace is never stored automatically. 

Interrupted activities. An APL operation in progress at the 
moment of occurrence of a bounce or disconnect may or may not be 
carried to its normal conclusion. A defined function in progress 
at such a moment will be suspended, but its progress can be 
resumed at a later work session in accordance with the procedures 
given in Part 3. A system command, once begun, will continue to 
completion regardless of the state of the terminal. 

If a bounce or disconnect occurs when the terminal is in 
definition mode, the definition process is arbitrarily terminated 
by the system. To proceed with the definition when CONTINUE is 
next activated, the definition mode can be re-established according 
to the procedures given in Part 3. The workspace is not saved in 
CONTINUE, however, if the bounce or disconnect occurred at the 
same time that the workspace is full, since there is no room to 
even close the definition. The continue commands will be rejected 
in definition mode. 

Detailed description. The trouble reports NO SPACE and LIBRARY 
TABLE FULL have been omitted from Table 2.1, and are also omitted 
from the notes below, because their occurrence is infrequent, and 
no corrective action can be taken from a remote terminal. They 
can arise in response to a continue command or a save command 
(see section on library control) , and signify that certain of 
the physical resources of the system have been exhausted. 

Elapsed time or time of day, given as a system response, is 
always in hours, minutes, and seconds; two digits for each, sepa- 
rated by periods. A date response is given as month, day and year; 
two digits for each, separated by slashes. Clock hours are counted 
continuously from midnight of the indicated day, and if the system 
runs past midnight it is possible to have time readings well above 
24 hours. For example, 34.22.00 07/11/68 would be 22' minutes 
past 10 AM on July 12, 1968. 



ACTION 

10.1- Start a work session: 
This is the sign-on, de- 
scribed in EC3 of Part 1 . 

TC2. End work session: 
Enter )0FF 

followed by a colon and a 
password, if desired. 



NOTES 



See Part 1, EC3. 



Passwords longer than eight 
characters are accepted, but only 
the first eight are meaningful. 
Spaces around the colon are neutral. 
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Effect: 

1. The currently active 
workspace will vanish. 

2. The duration of the work 
session and the amount of 
computer time used will be 
noted internally for later 
accounting. 

3. The password, if used, 
becomes the password for 
the account number. If 
there was a previous pass- 
word, this one replaces 
it. 



4. A dial-up connection to 
the central computer will be 
broken. 

Re sp onse; 

1. The port number, time of 
day, date, and user code 
will be printed on one line. 

2. Accounting information 
will be printed on two 
lines, giving terminal con- 
nection time and central 
computer time. 



TC3. En d work session and 
hold dial-up connection: 
Enter )OFF HOLD 
followed by a colon and a 
password, if desired. 



There is no effect on any stored 
workspace. 



Once applied, a password stays in 
effect until explicitly changed by 
an ending command that contains 
a colon. 

An existing password is removed if 
no password follows the colon. 

If a colon is not used, the existing 
password, if any, remains in force. 



Trouble £egort^: 

INCORRECT' COMMAND 



The time used in this session and 
cumulative time since the last 
accounting are given in the stand- 
ard format, for both terminal 
time and computer time. 

The DATA light on telephone data- 
sets will go out. 

See note at TC2. 



Effect: 

1. 2. and 3, 

TC2. 



Same as for 



4. The dial-up telephone 
connection will be main- 
tained for 60 seconds, 
pending a new sign-on. 



An attention signal at this time 
may cause the connection to be 
broken . 
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Response: 

1. and 2. Same as for TC2. 

3-C.l* 1^4 work session and 
§5°^s active workspace: 
Enter ) CONTINUE 
followed by a colon and a 
password, if desired. 



Effect: 

1. A copy of the currently 
active workspace will be 
stored in the user ' s private 
library with the name 
CONTINUE. If the workspace 
has been activated from a 
stored workspace with a 
password, the same password 
will be applied to CONTINUE. 



INCORRECT COMMAND 

See note at TC2. 

A bounce has the same effect and 
response as this command. A dis- 
connect has the same effect, but no 
response. 



This effect will not take place if 
the active workspace is not holding 
information. 

When the workspace is saved it 
replaces any workspace previously 
stored with the name CONTINUE. 



2. 3. 

TC2. 



and 4. Same as for 



Response: 

1. Time of day and date, 

followed by CONTINUE. 



2. and 3. Same as for TC2, 
response 1 and 2. 



5-C5. End work session, 
§£°£® 5£ti v f workspace, 
§™i il°i? dlal-ujPconnection; 
Enter ) CONTINUE HOLD 
followed by a colon and a 
password, if desired. 

Effect: 

1 . Same as for TC4 . 

2. and 3. Same as for TC2. 
4. Same as for TC3 . 



This response will be omitted if the 
workspace was not saved. See note 
at Effect 1. 

•F?9!?*? le . £fP2£ts ; 
NOT WITH OPEN DEFINITION 
means that the terminal is in 
definition mode. Close the defini- 
tion by entering the character V. 
(See mechanics of function defini- 
tion in Part 3.) 

INCORRECT COMMAND 

See note at TC2. 
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Response: Trouble E^.22^.^. 1 

1. 2. and 3. Same as for NOT WITH OPEN DEFINITION 

TC4. See TC4 . 

INCORRECT COMMAND 

WORKSPACE CONTROL COMMANDS 

The commands in this class can replace the active workspace 
with a clear one, or with a copy of a stored workspace; bring 
together in the active workspace information from many stored 
workspaces; form groups within the active workspace; remove un- 
wanted objects from the active workspace; and set controls 
governing certain operations. No command in this class affects 
any but the active workspace. 

Application packages. The usefulness of a terminal system is 
enhanced" ~"£y the availability of many different collections of 
functions and variables, each of which is organized to satisfy 
the computational needs of some area of work; for example, 
standard statistical calculations, exercised for teaching a 
scholastic subject, complex arithmetic, business accounting, 
text editing, etc. The workspace-centered organization of 
APIA 360 lends itself to such packaging, because each collection 
moves as a coherent unit when the workspace containing it is 
stored or activated. 

The copy commands provide a convenient way to assemble 
packages from components in different workspaces. The group com- 
mand makes it convenient to have a multiplicity of more specialized 
packages in a single workspace, sharing common elements, but 
available individually by copying the appropriate group. 

Groups. The group command assigns a single name to a collection 
of "names, in order to provide more convenient reference to 
selected functions and global variables. The group name can 
subsequently be used for three purposes: to move a copy of the 
entire set of referenced objects between workspaces, to incorporate 
the group members within another group, and to erase, in a single 
operation, all objects referenced by the group. Each of these 
is further explained below, in connection with the relevant 
operation. 

Information transfer between workspaces. Information entered 
or~ developed within one workspace can be made available within 
another by means of the copy and protecting-copy commands, which 
reproduce within the active workspace objects from a stored 
workspace. These are two sets of parallel commands which differ 
only in their treatment of an object in the active workspace 
which has the same name as an object being reproduced: the copy 
commands will replace the existing object, whereas the protecting- 
copy commands will not make the replacement. 
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A copy command of either type can be applied to an entire 
workspace or to a single object (i.e., a function, variable, or 
group) . When an entire workspace is copied, all the functions 
and global variables within it are subject to the operation, but 
its index origin and output control settings, state indicator, 
and local variables are left behind. 

When a group is copied without protection, both its definition 
(that is, the group name and the collection of names composing the 
group) and the objects referenced by the names within it, are 
reproduced in the active workspace. 

If one of the names in this group's definition is the name 
of another group, that group's definition is copied but not its 
referenced objects. 

The table below shows the contents of a stored workspace 
(SAVEDWS) . 



A 


FN1 


VAR1 


B 




V FN1 
Cl] 
[2] 

t 

t 


VAR1+2 


FN2 
VAR2 


B 


FN2 


VAR2 






V FN2 
[1] 
[2] 
i 

t 
t 

LN1 V 


VAR2+H 





A and B are group names. A consists of a function, FN1 , whose 
definition is indicated below it; a variable, VA R 1 , whose defini- 
tion is value 2, and a group, B, defined by the names FN2 and 
VAR2. Within the group B itself, FN2 is defined by its function 
definition, and VAR2 is defined by 4. Now, if SAVEDWS A is 
copied by 

)COPY SAVEDWS A 

the resulting active workspace will contain 



FNX 


VARl 


B 


VF/1/1 
[13 
[2] 
i 

t 

th v 


VAR1+-2 


FN2 
VAR2 
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It will not contain 



7M2 
[13 
[2] 



4 (definition of VAR2) 



In other words, the definition of FN2 and the value 4 will not be 
copied. 

When copied with protection, the group itself, or any of the 
objects referenced by its members, will be omitted in order to 
protect an object in the active workspace. If the group definition 
is successfully copied under these circumstances, the names com- 
posing it will refer to the global objects by those names in the 
active workspace, regardless of whether they were copied with the 
group or were present before. 

Detailed Description. The term workspace identification is used 
here to mean either a library number followed by a workspace name, 
or a workspace name alone. When a name is used alone, the refer- 
ence is to the user's private library. 



ACTION 

WC1. Activate a clear work- 
space: 
Enter ) CLEAR. 

Effect: 

1. A clear workspace will 
be activated, replacing the 
presently active workspace. 



Response: 

1. CLEAR WS 

WC2. Activate a copy of a 

Enter )LOAD 

followed by a space and a 
workspace identification 
(with the password, if 
required) . 



NOTES 

This command is used to make a fresh 
start, discarding whatever is in 
the active workspace. 



A clear workspace has no variables, 
groups, or defined functions. 

Its control settings are: 

index origin, 1; significant digits, 

10; line width, 120. 

Its workspace identification does 
not match that of any stored work- 
space. (See section on library 
control. ) 

!H?°y^i® message: 

INCORRECT COMMAND 

This command may be used to obtain 

the use of any workspace in the 

system whose identification (and 
password) is known. 
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Effect: 

1. A copy of the designated 
workspace will be activated, 
replacing the presently 
active workspace. 

Response: 

1. SAVED, followed by the 
time of day and the date 
that the source workspace 
was last stored. 



Trouble messages: 

WS~ 'NOT' 'FOUND 

means there is no stored workspace 

with the given identification. 

WS LOCKED 

means that no password, or the 
wrong password, was used when one 
was required. 

INCORRECT COMMAND 



WC3. Copy a 2i°*??:i °kj.ect 
f?°51 § §t9:?e.d workspace^: 
Enter )COPI 

followed by a space and a 
workspace identification 
(with the password, if 
required) , followed by a 
space and the name of the 
object to be copied. 

Effect: 

1. A copy of the desig- 
nated object will appear 
in the active workspace 
with global significance, 
replacing existing global 
homonyms . 



A global object may be a group, 
function, or global variable. 

When applied to a group, all copy 
commands operate both on the group 
definition and on objects referenced 
by the group members. 



Members of a group do not neces- 
sarily have referents; but a group 
member without a referent in the 
source workspace may find one in 
the active workspace. 



Response: Trouble messages: 

1. SAVED, followed by the NOT WITH OPEN DEFINITION 
time of day and the date means that the terminal is in 
that the source workspace was definition mode. Either close the 
last stored. definition by entering v , or defer 

the copy operation. 

WS NOT FOUND 
See WC2. 

WS LOCKED 
See WC2. 

OBJECT NOT FOUND 

means that the designated workspace 
does not contain a global object 
with the given name. 
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WS FULL ERROR 

means that the active workspace 
could not contain all the material 
requested: 

if copied at all, variables and 
functions will be copied completely; 
some objects may be completely over- 
looked. Status may be determined by 
using appropriate inquiry commands. 

INCORRECT COMMAND 



WC3a. Copy all global 

objects ?£° I !1 ? l^oredT 

W 9£]S.?E?:5.® : 
Enter )COPI 

followed by a space and a 

workspace identification 

(with the key, if required) . 



See notes at WC3, 



Effect: 

1. A copy of all functions, 
groups, and global variables 
in the source workspace will 
appear in the active work- 
space with global signif- 
icance, replacing existing 
global homonyms. 

Response: 

1. SAVED, followed by the 
time of day and the date 
that the source workspace 
was last stored. 



f?2^ £ stored "workspace, 

space? 

Enter )PCOPY 

followed by a space and a 
workspace identification 
(with the password, if 
required) , followed by a 
space and the name of the 
object to be copied. 

Effect: 

1. A copy of the desig- 
nated object will appear in 
the active workspace unless 
there is an existing global 
homonym. 



Local variables, the state indi- 
cator, and settings for origin, 
significant digits, and width are 
not copied. 



Trouble messages: 

NOT WITH OPEN DEFINITION 

WS NOT FOUND 

WS LOCKED 

WS FULL ERROR 

INCORRECT COMMAND 

See WC3 for all meanings. 

See notes at WC3. 
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B?^E9Q§e: Trouble messages: 

1. SAVED, followed by the NOT WITH OPEN DEFINITION 
time of day and the date WS NOT FOUND 
that the source workspace WS LOCKED 
was last stored. OBJECT NOT FOUND 

WS FULL ERROR 
INCORRECT COMMAND 
See WC3 for all meanings. 

WC4a. Copy all global objects^ See notes at WC3. 
from a stored workspace/ 
E£2tecting ^he ??t lve work ~ 
space: 

Enter )PCOPY 

followed by a space and a 
workspace identification 
(with the password, if 
required) . 



Effect: 

1. A copy of all global 
objects in the source work- 
space which do not have 
global homonyms in the 
active workspace will appear 
in the active workspace. 



See note at WC3a, Effect 1. 
See note at WC4, Effect 1. 



Response: 

1. SAVED, followed by the 
time of day and the date 
that the source workspace 
was last stored. 



Trouble messages: 

NOT WITH OPEN DEFINITION 

WS NOT FOUND 

WS LOCKED 

WS FULL ERROR 

INCORRECT COMMAND 

See WC3 for all meanings. 



5?C5. Gather names into a 
group : 

Enter ) GROUP 
followed by a space and 
one or more names sepa- 
rated by spaces. 



Effect: 

1. The first name will be 
the name of a group having 
the other names as mem- 
bers, subject to the rules 
given in the adjacent 
notes. An existing group 
with the same name will be 
superseded. 



The first name used in the command 
must not be the name of a function 
or global variable. 

Any name may be a member of a 
group; names of groups, functions, 
and global variables, and names 
without current global referents 
are all acceptable. 



Members may be added to an existing 
group by using the group name twice 
in the command: as the first name 
and as another. 
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2. If only one name is used When a group is dispersed the group 
in the command, no group is definition is destroyed, but the 
formed, and an existing group referents of the group members are 
by that name is dispersed. unaffected. 



Response; None . 



Trouble reports: 

NOT' GROUPED , NAME IN USE 

means that the first name used in 

the command is the name of a function 

or global variable. Erase the 

offending object, or use a different 

name. 



INCORRECT COMMAND 



WC6. Erase global objects: 

Enter ) ERASE 

followed by a space and the 

names of objects to be 

deleted, separated by 

spaces. 



This is the only way to remove a 
global variable, and the most con- 
venient way to remove a collection 
of objects. 



Effect: 

1. Named objects having 
global significance, other 
than pendent functions, will 
be expunged. 



Names which do not refer to global 
objects are ignored. 

When a group is erased, both the 
group and the referents of its mem- 
bers are expunged. 



WC7. Set index origin for 
?£??y operations: Enter the 
characters ) ORIGIN 
followed by a space and a 
or 1. 



INCORRECT COMMAND 

A dynamically executable equivalent 
function is available (see Part 4) . 



Effect: 

1. First elements of arrays 
in the workspace will be 
numbered zero or one, as 
indicated, and subsequent 
use of index-dependent APL 
operations will be appro- 
priately affected. 

Response: 

1. WAS, followed by the 

former origin. 



These matters are explained in 
Part 3. 



Trouble reports: 

INCORRECT COMMAND 
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WC8. Set maximum for sig- 
nificant digits in output: 
Enter ) DIGITS 
followed by a space and 
an integer between 1 and 
16 inclusive. 



A dynamically executable equivalent 
function is available (see Part 4) . 



Effect: 

1. Subsequent output of 
numbers will show no greater 
number of significant digits 
than indicated. 



Response: 

1. WAS, followed by the 

former maximum. 



This command has no effect on the 
precision of internal calculations, 
which is approximately 16 decimal 
digits. 

When displaying an APL statement 
that contains a numeric constant, 
the constant will be displayed with 
up to 16 significant digits 
regardless of the ) DIGITS command 
setting. 

INCORRECT COMMAND 



WC9« Set maximum width for 

an output line: 

Enter ) WIDTH 

followed by a space and an 

integer between 30 and 130 

inclusive. 



A dynamically executable equivalent 
function is available (see Part 4) . 



Effect: 

1. Subsequent output of all 
kinds, except messages be- 
tween terminals, will be 
limited to a line width no 
greater than the number of 
spaces indicated. 



This affects neither the mechanical 
margin stops nor the allowable 
length of input lines. 



Response : 

1. WAS, followed by the 

former maximum width. 



T^.°^l§. £§E°?t: 

INCORRECT COMMAND 



WCIP..- Change workspace 

identification: 

Enter " ) WSID 

followed by a space and a 

workspace identification. 



This command can be used to guard 
against inadvertently changing a 
stored workspace that has just been 
loaded; and conversely, to enable 
the replacement of a stored work- 
space without first using the drop 
command, when the active workspace 
came from a different source. (See 
section on library control commands.) 
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Effect: 

1. The active workspace will See command LCI for the implications 

assume the specified identi- of this. 

fication. A password 

associated with the workspace 

will be retained. 



Response: 

17 WAS, followed by the 
former workspace identifi- 
cation. 



Trouble report: 

INCORRECT COMMAND 



WCll. Change 5 u ?Dti^Y °.f 

p^E^y-?^ ?y™koTs: 

Enter ~JSYMBOLS n" 



n is an integer between 26 and 
4241. This command can be used only 
in a CLEAR workspace. The command 
changes the size of an internal 
symbol table to a value not less 
than n. Normally, 256 names may be 
used in a standard workspace. With 
this command, up to 4241 names may 
be used. 



Effect: 

1. The size of the internal 

symbol table is changed from 

the normal 256 to a value not 

less than n. n is an integer 

ranging between 26 and 

4241. 



Response : 

1. WAS, followed by the 

former symbol table size. 



Trouble report: 

INCORRECT COMMAND 

This report is also printed if the 

) SYMBOLS command is issued and the 

active workspace is not a clear 

workspace. 



LIBRARY CONTROL COMMANDS 

There are two basic operations performed by the commands in 
this class. The save commands cause a copy of an active workspace 
to be stored in a library, and the drop command causes such a 
stored copy to be destroyed. 

The save commands and the load command are symmetric, in the 
sense that a load command destroys an active workspace by 
replacing it with a copy of a stored workspace, while a save com- 
mand may destroy a stored workspace by replacing it with a copy 
of the active workspace. 

Continuity °f ^°?k' When a workspace is stored, an exact copy of 
the active workspace is made, including the state indicator and 
intermediate results from the partial execution of halted func- 
tions. These functions can be restarted without loss of continuity 
(see Part 3) , which permits considerable flexibility in planning 



2.19 



use of the system. For example, lengthy calculations do not have 
to be completed at one terminal session; student work can be con- 
ducted over a series of short work .periods, to suit class 
schedules; and mathematical experimentation or the exploration of 
system models can be done over long periods of time, at the 
investigator's convenience. 

Workspace identification. A library number and a name, together, 
uniquely identify each stored workspace in the system. An active 
workspace is also identified by a library number and a name, and 
as copies of stored workspaces are activated, or copies of the 
active workspace are stored, the identification of the active 
workspace may change according to the following rules:: 

1. A workspace activated from a library assumes the 
identification of its source. 

2. When a copy of the active workspace is stored, the 
active workspace assumes the identification assigned to 
the stored copy. 

3. The library number and name may be arbitrarily changed 
by the use of command WC10. 

4. A clear workspace activated by a clear command, a 
sign-on, or a system failure is called CLEAR WS, which 
cannot be the name of a stored workspace. 

The identification of active workspaces is used in two ways. 
First, as a safeguard against the inadvertent replacement of a 
stored workspace by an unrelated one: an attempt to replace, 
by a copy of the active workspace, any stored workspace other 
than the one with the same identification (or the one named CON- 
TINUE) , will be stopped. Second, as a convenience when the 
active workspace is to be re-stored with changes: the use of the 
command )SAVE, without modification, implicitly uses the identi- 
fication of the active workspace. 

kibr§£Y and account numbers. A user's account number is also 

the number of his private library. The numbers of public libraries 

range from 1 to 999, and do not correspond to any account number. 

Each stored workspace has implicitly associated with it the 
account number signed on at the terminal from which the save com- 
mand was entered, and may not be either replaced or erased, ex- 
cept from a terminal signed on with the same account number. 
Thus, a user is prevented from affecting the state of another 
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user's private library, or tampering with public library work- 
spaces which he did not store. He may, of course, activate a 
copy of any workspace stored in the system, if he knows the library 
number and name (and password, if required) . 

Storage allotment. A user of APIA 360 is assigned library space 
In" terms of the maximum number of stored workspaces he may have 
at one time. This quota applies to the combined total of workspaces 
stored either in his private library or in public libraries. The 
allotment for each user is determined by those responsible for the 
general management of a particular system, and can be changed from 
the recording terminal, as required, within the bounds of the 
physical resources of the system. 

Up to the number in his quota, a user may assign arbitrary 
names to the workspaces he stores. Beyond that point he always 
has available one workspace named CONTINUE in his private library. 

Use of the CONTINUE workspace. This workspace has the property 
that "Tt "may be freely replaced by an active workspace having any 
identification whatsoever. It is thus always available as tempo- 
rary storage, but carries with it the danger of being easily 
replaced, as described in the section on terminal control com- 
mands. 

The attributes of the CONTINUE workspace are the same whether 
stored as a result of a continue command, disconnect, or bounce, 
or stored by virtue of a save command using that name. In the 
last case, the active workspace assumes the name CONTINUE, as it 
Would any other name under like circumstances. 

Purging a workspace. The sequence of commands, )SAVE ABC123, 
1CLEAR, )CdPI~ABC123, will purge the active workspace, clearing it 
of all but its functions, groups, and global variables, and 
reset its controls (see WCl) . This often results in more usable 
space than can otherwise be realized. Subsequently, the commands 
)WSID ABC123 and )SAVE may be used to store a copy of the purged 
workspace under its former name. 

Detailed Description. The term workspace identification will be 
usea~with~the~Iami"significance as for the workspace control com- 
mands. 



2.21 



ACTION 



NOTES 



LCI. ?e-store a copy^ of the 
Enter )SAVE 



Effect: 

1. A copy of the active 
workspace will replace the 
stored workspace with the 
same identification. 



New workspaces can be stored 
by this command only if the 
identification of the active 
workspace has been changed by 
WC10. 



2. A password associated 
with the active workspace 
will continue in effect, 
and the stored workspace 
will be protected with 
this password. 



This forestalls inadvertent 
omission of a password while 
actively engaged with a con- 
fidential workspace.. 



Response : 

1. The time of day, date, 
and workspace identification 
will be printed. 



Trouble report s_: 
NOT~WITH OPEN DEFINITION 
means that the terminal is 
in function definition mode, 
Either close the definition 
by entering v, or defer the 
save operation. 



NOT SAVED, WS QUOTA USED UP 
means that the alotted num- 
ber of stored workspaces 
has previously been reached. 
Unless this is increased, the 
workspace can be stored only 
by replacing a workspace 
already stored. CONTINUE 
may be replaced directly; 
any other must be erased first, 
or the identification of the 
active workspace must be 
made to match by WC10. 
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NOT SAVED, THIS WS IS 

CLEAR WS 
results from the fact that 
CLEAR WS. cannot be the name 
of a stored workspace. Either 
change the name by WC10, or 
use LCla. 

IMPROPER LIBRARY REFERENCE 
means that an attempt was 
made either to replace a 
stored workspace that is not 
under control of the account 
number signed on at the ter- 
minal, or to store into a 
non-existent library. 



INCORRECT COMMAND 



LCla. Store a copy of the 

active workspace: 

Entir )SAVE 

followed by a space and a 

workspace identification, 

with a colon and password, 

if desired. 



This form of the save command 
allows new workspaces to be 
added to a library more con- 
veniently, and permits passwords 
to be added or removed from 
workspaces already present. 



Effect: 

1. A copy of the active 
workspace will be stored 
with the designated iden- 
tification, and with the 
assigned password, if a 
password was used. 



A stored workspace with the 
same identification will be 
replaced. 

A password associated with a 
stored workspace will not be 
retained if the command does 
not include a lock explicitly. 



2. The active workspace 
will assume the workspace 
identification used in 
the command. 



To this extent only, this com- 
mand may affect the state of 
the active workspace. 
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Reapan.se : 

1. The time of day and date 

will be printed. 



Trouble reports: 

NOT WITH OPEN DEFINITION 
means the same as for LCI. 

NOT SAVED, WS QUOTA USED UP 
means the same as for LCI. 

NOT SAVED, THIS WS IS 
followed by identification 
of the active workspace, 
means a stored workspace 
with the identification used 
in the command exists, but 
this identification does not 
match that of the active 
workspace. 

IMPROPER LIBRARY REFERENCE 
means the same as for LCI. 

INCORRECT COMMAND 



LC2- Erase a stored workr 

space : 

Enter )DROP 

followed by a space and a 

workspace identification. 

Effect: 

1. The designated stored 

workspace will be expunged. 



Response : 

1„ The time of day and date 

will be printed. 



Since a key is not used, a 
locked workspace whose key 
has been lost can always be 
removed from the system. 



This command has no effect 
on the active workspace, 
regardless of its 
identification. 

Trouble reports: 

IMPROPER LIBRARY REFERENCE 
means that an attempt was 
made to drop a workspace 
stored by another user. 



WS NOT FOUND 

means that there is no 

stored workspace with the 

identification used in the 

command. 

INCORRECT COMMAND 
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INQUIRY COMMANDS 

Most of the commands in this class concern the state of 



the others, one command lists the 
uamvo _ rTVi .,_ Jr „„„„ ... libraries, and two commands are 
useful for locating another user at a connected terminal, in 
order to communicate with him. 



the active workspace. Of 
names of workspaces in 



Us.gr, CQdes. The communication commands described in the 
next section require that the port number of the person to 
be addressed be known. The inquiry commands that provide 
this information operate through the device of u§er codes, 
which serve within the system as partial identification of 
users. (The user account numbers, which completely identify 
users within the system, are not used for this purpose, and 
are treated as private information. ) A user code comprises 
the first three characters of his 'name, as it appears in the 
sign-on response (Part 1, EC3, Response 2). 

A user code is considered to be only partial 
identification because it may not be unique. Therefore, 
these commands should be used advisedly: before addressing 
substantive messages to a terminal which has been identified 
by a user code, further confirmation of the receiver s 
identity should be sought. 



Detailed description. 
ACTION 



NOTES 



IQIjs. List names of defined 

functions : 

Enter )FNS 

followed by an alphabetic 

character, if desired. 



Effect: 



None. 



Response : 

1. The names 

functions in 

workspace will 

alphabetically , 

with the specified letter. 

If a letter was not used, 

all function names will be 

listed. 



of defined 

the active 

be printed 

starting 



Trouble message : 

INCORRECT COMMAND 
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IQ2jt Li§£ names q£ global 

Y3£i3£Aes : 

Enter )VARS 

followed by an alphabetic 

character, if desired. 

Effegt: None. 



BgSEQQSS : 

1. The names of global 
variables in the active 
workspace will be printed 
alphabetically, starting 
with the specified letter. 
If a letter was not used, 
all names of global 
variables will be listed. 



Trouble message : 

INCORRECT COMMAND 



IQ~L. Lis£ names Qf groups: 
Enter )GRPS 

followed by an alphabetic 
character, if desired. 

Effegt: None. 



&§§B2n§§ : 

1. The names of groups in 
the active workspace will be 
printed alphabetically, 
starting with the letter 
used. If a letter was not 
used, all group names will 
be listed. 



Trouble message : 

INCORRECT COMMAND 
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IQ4j. List membership of 

designated group: 

Enter )GRP 

followed by the name of the 

group. 

Effect: None. 



Response : 

1. The names in the 

will be printed. 



group 



There will be no response if 
there is no group with the 
designated name 
active workspace. 



in 



the 



Trouble message : 

INCORRECT COMMAND 



IQSjl List halted functions : 
Enter )SI 



The line numbers on which 
halted functions have 
stopped are available for 
dynamic use through the 
system-dependent functions 
126 and 127. (See Part 3.) 



Effect: None. 



£e spon se : 

1. The names of halted 
functions will be listed, 
most recent ones first. 
With each name will be given 
the line number on which 
execution stopped. Suspend- 
ed functions will be 
distinguished from pendent 
functions by an asterisk. 



This display is the state 
indicator; its significance 
and use is explained in Part 
3. 

Trouble message : 
INCORRECT COMMAND 
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IQ^* List halted functions 
with names of Iqc^iI 
variables : 
Enter )SIV 



Effect : None . 



1. The response will be the 
same as for IQ5, except that 
with each function listed 
there will appear a listing 
of its local variables. 



TrgybJLe message: 

INCORRECT COMMAND 



JQli Give identification of 
ac±j yg wgrkspace : 
Enter )WSID 



Effect: None. 



EesPQase: 

1. The identification of the 
active workspace will be 
printed. The library number 
will be included only if it 
differs from the account 
number associated with the 
terminal. 



Troufeie message : 

INCORRECT COMMAND 



IQ8 A iisi names, gf stared 

works pacgs : 

Enter )LIB 

followed, if necessary, by a 

library number. 

Effect; None. 

B§ s pens e: 

1. The names of workspaces 
in the designated library 
will be printed. If no 
number was used, the account 
number associated with the 
terminal will be taken as 
the library number. 



A library number is not 
required for listings of the 
user's private library. 



Trouble messages: 

IMPROPER LIBRARY REFERENCE 
means that an attempt was 
made to obtain a listing of 
another user's private 
library, or of a 
non-existent library. 

INCORRECT COMMAND 
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IQ9* Lisi EQEts in use and 
cedes q£ SQnneQted us,er§ : 
Enter ) PORTS 



Effegt: None. 

B§sgQns§: 

1. Port numbers in use will 
be printed with the 
associated user code. 



Trouble message: 

INCORRECT COMMAND 



IQlflx Li§t pert numbers 
associated with cje§ig~ 
oated user sod§: 

Enter ) PORTS 

followed by the user code. 



User codes are not 
necessarily unique, and the 
information derived from 
this command and IQ9 should 
be used advisedly. 



Ef.fe.st: None. 

Response : 

1. The port numbers of 
connected users identified 
by the code will be printed. 



Trouble message: 

INCORRECT COMMAND 



COMMUNICATION COMMANDS 

There are two pairs of commands in this class. One 
pair addresses any connected terminal, and one pair 
addresses only the system recording terminal. 

A message can be received by a terminal only when its 
keyboard is locked, and except for public address 
announcements from the system recording terminal, only if it 
is also not in the process of function execution. Hence, to 
facilitate two-way communication, one of each pair of 
communication commands results in locking the keyboard of 
the sending terminal, pending the receipt of a reply. A 
keyboard so locked can be unlocked by an attention signal. 

Incoming messages from the system recording terminal 
are prefixed by OPRi , and public address messages are 
prefixed by PAl : . 
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If the interaction at a terminal must be interrupted 
for a prolonged period while the terminal is still 
connected, it is good practice to lock the keyboard so that 
a message may be received. This can be done by addressing a 
message of the proper type to the terminal's own port 
number. 

Peisilg^ £§.§£ript ion . The length of a message is restricted 
to a single line, not exceeding 120 characters in length. 
However, messages are not subject to the width settings of 
either the sending or receiving terminal. 



A£TION 



text to design 



CUIjl Address 

Dated port: 

Enter )MSGN 

followed by 

and any one- line text. 



a port number 



NOTES 

A message addressed to an 
unused or non-existent port 
will be reflected back to 
the sending terminal, which 
then plays the role of both 
sender and receiver. 



Effect : 

1. The keyboard will lock 
while the text is being 
transmitted. 

2. The text will be printed 
at the receiving terminal, 
prefixed by the port number 
of the sending terminal. 

3. The keyboard will unlock 
when the transmission is 
completed. 



Response : 

1. SENT 



Trouble message : 
MESSAGE LOST 

means just that. It happens 
when attention is signalled 
before a message is 
delivered, or an equivalent 
transmission disturbance 
occurs. 



INCORRECT COMMAND 
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CM2 A Address text to desigr 

nated port and lock keyr 

board : 

Enter )MSG 

followed by a port number 

and any one- line text. 



See note at CMl. 



Effect : 

1. Same as CMl effect 1. 

2. Same as CMl, Effect 
except for a prefix R, 
indicate that a reply 
awaited. 



2, 
to 

is 



3. The keyboard will remain 
locked after the response is 
printed. 



The keyboard can be 
unlocked, before receiving a 
reply, by means of an 
attention signal. 



Response: 

1. SENT 



Trouble message : 

MESSAGE LOST 
See CMl. 



INCORRECT COMMAND 



CM3.t Address text to system 

recording terminal: 

Enter )OPRN 

followed by any one-line 

text. 



See note at CMl. 



Effect: 

1. 2. and 3. Same as CMl. 



RespQnse: 

1. SENT 



Trouble message: 

MESSAGE LOST 
See CMl. 



INCORRECT COMMAND 
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CM4.&. Address text to system See note at CM1, 

Egcgrding te.rmi.nal and lock 

keyboard: 

Enter )OPR 

followed by any one- line 

text. 

Effect: 

1. 2. and 3. Same as CM2. 



Be.S12Q.QSe: Trouble message: 

1. SENT MESSAGE LOST 

See CM1. 

INCORRECT COMMAND 
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PART 3 



THE LANGUAGE 



The APIA 3 60 Terminal System executes system commands or 
mathematical statements entered on a terminal typewriter. 
The system commands were treated in Part 2; the mathematical 
statements will be treated here. 

Acceptable statements may employ either ^ximitiv.e 
Junctions (e.g. + - x * ) which are provided by the system, 
or defined Junctions, which the user provides by entering 
their definitions on the terminal. 

If system commands are not used, the worst that can 
possibly result from erroneous use of the keyboard is the 
printing of an 3JX9X J£»art. It is therefore advantageous 
to experiment freely and to use the system itself for 
settling any doubts about its behavior. For example, to 
find what happens in an attemped division by zero, simply 
enter the expression HtO. If .ever the system seems 
unusually slow to respond, execute an attention signal to 
interrupt execution and unlock the keyboard. 

The Sample Terminal Session of Appendix A shows actual 
intercourse with the system which may be used as a model in 
gaining facility with the terminal. The examples follow the 
text and may well be studied concurrently. More advanced 
programming examples appear in Appendix B. 

The primitive functions and the defined functions 
available in libraries can be used without knowledge of the 
means of defining functions. These means are treated in the 
four contiguous sections beginning with Defined Functions 
and ending with Homonyms. These sections may be skipped 
without loss of continuity. 

FUNDAMENTALS 

Statements. Statements are of two main types, the branch 
(denoted by -> and treated in the section on Defined 
Functions), and the .special caiioB . A typical specification 
statement is of the form 

This statement assigns to the variable X the value resulting 
from the expression to the right of the specification arrow. 
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If the variable name and arrow are omitted, the resulting 
value is printed. For example: 
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Results typed by the system begin at the left margin 
whereas entries from the keyboard are automatically 
indented. The keyboard arrangement is shown in Figure 1.2. 

Scalar and yeeio-r SQnstanks. All numbers entered via the 
keyboard or typed out by the system are in decimal, either 
in conventional form (including a decimal point if 
appropriate) or in exponential form. The exponential form 
consists of an integer or decimal fraction followed 
immediately by the symbol E followed immediately by an 
integer. The integer following the E specifies the power of 
ten by which the part preceding the E is to be multiplied. 
Thus l„44£'2 is equivalent to 14 4-. 

Negative numbers are represented by_ a negative sign 
immediately preceding the number, e.g., 1.44 and ~144£'~2 
are equivalent negative numbers. The negative sign can be 
used only as part of a constant and is to be distinguished 
from the negation function which is denoted, as usual, by 
the minus sign -. 

A constant vector is entered by typing the constant 
components in order, separated by one or more spaces. A 
character constant is entered by typing the character 
between quotation marks, and a sequence of characters 
entered in quotes represents a vector whose successive 
components are the characters themselves. Such a vector is 
printed by the system as the sequence of characters, with no 
enclosing quotes and with no separation of the successive 
elements. The quote character itself must be typed in as a 
pair of quotes. Thus, the abbreviation of " CANNOT i s 
entered as 'CAN"T' and prints as CAN'T. 

Nanjes aad Spaces. As noted in Part 2, the name of a 
variable or defined function may be any sequence of letters 
or digits beginning with a letter and not containing a 
space. A letter may be any of the characters A to Z, or any 
one of these characters underscored, e.g. , 1 or i 

Spaces are not required between primitive functions and 
constants or variables, or between a succession of primitive 
functions, but they may be used if desired. Spaces are 
needed to separate names of adjacent defined functions, 
constants, and variables. For example, the expression 3+4 
may be entered with no spaces, but if F is a defined 
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function, then the expression 3 F 4 must be entered with the in- 
dicated spaces. The exact number of spaces used in succession is 
of no importance and extra spaces may be used freely. 

Overstriking and erasure. Backspacing serves only to position the 
carriage and does not cause erasure or deletion of characters. It 
can be used: 

1. to insert missing characters (such as parentheses) if 
space has previously been left for them, 

2. to form compound characters by overstriking (e.g. <j> and 
! ) , and 

3. to position the carriage for erasure, which is effected 
by striking ATTN (marked LINE FEED on 2740 and 1050 ter- 
minals) . The line feed has the effect of erasing the charac- 
ter at the position of the carriage, and all characters to 
the right. 

End of Statement. The end of a statement is indicated by striking 
the carriage return (followed, on some terminals, by an explicit 
transmission signal as described in Part 1) . The typed entry is 
then interpreted exactly as it appears on the page, regardless of 
the time sequence in which the characters were typed. 

Maximum number of input characters. The maximum number of _ charac- 
ters which may be entered as one line is 266. This count includes 
the six initial blanks of the indention for keyboard entries, and 
the carriage return itself. (On a 2741 terminal, characters may 
be entered beyond the right margin by the expedient of manually 
advancing the paper, then shoving the carriage back toward the 
left margin. ) 

If an attempt to enter more than 266 characters is made, the 
system rejects the entry, responds RESEND, then repeats the 
characters up to the 266th. The system awaits a new try to enter 
characters. 

Order of execution. In a compound expression such as 3x4+6*2, the 
functions are executed (evaluated) from rightmost to leftmost, 
regardless of the particular functions appearing in the expression. 
(The foregoing expression evaluates to 21.) When parentheses are 
used, as in the expression W+(. 3[Q) *XxY-Z, the same rule applies, 
but as usual, an enclosed expression must be completely evaluated 
before its results can be used. Thus, the foregoing expression is 
equivalent to W-{ 3 TO) ♦(**( X-Z) ) . 

In general, the rule can be expressed as follows: every 
function takes as its righthand argument the entire expression to 
its right, up to the right parenthesis of the pair that encloses 
it. 

Error reports. The attempt to execute an invalid statement will 
cauie one~6f the error reports of Table 3.1 to be typed out. The 
error report will be followed by the offending statement with a 
caret typed under the point in the statement where the error was 
detected. If the caret lies to the right of a specification arrow, 
the specification has not yet been performed. 
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TYPE 



CHARACTER 
DEPTH 

DOMAIN 
DEFN 



INDEX 
INTERRUPT 

LENGTH 
NONCE 

RANK 
RESEND 



SI DAMAGE 



SYNTAX 



SYMBOL 

TABLE 

FULL 

SYSTEM 



VALUE 



WS FULL 



Cause; CORRECTIVE ACTION 



Illegitimate overstrike. 

Excessive depth of function execution. CLEAR STATE 
INDICATOR. 

Arguments not in the domain of the function. 
Misuse of v or Q symbols: 

1. V is in some position other than the first. 

2. The function is pendent. DISPLAY STATE 
INDICATOR AND CLEAR AS REQUIRED. 

3. Use of other than the function name alone in 
reopening a definition. 

4. Improper request for a line edit or display. 
Index value out of range. 

Execution was suspended within an APL statement. 
To resume execution, enter a branch to the state- 
ment interrupted. 

Shapes not conformable. 

A syntactically correct statement has been entered 
but cannot be executed because of APL\360 implemen- 
tation restrictions. 

Ranks not conformable. 

Transmission failure or more than 266 characters 
entered in one line. RE-ENTER. IF CHRONIC, 
REDIAL OR HAVE TERMINAL OR PHONE REPAIRED. 

The state indicator (an internal list of suspended 
and pendent functions) has been damaged in editing 
a function or in performing a COPY. 

Invalid syntax; e.g., two variables juxtaposed; 
function used without appropriate arguments as dic- 
tated by its header; unmatched parentheses. 

Too many names used. SAVE, CLEAR, COPY 
or SAVE, CLEAR, SYMBOLS, COPY 
or ERASE, SAVE, CLEAR, COPY 

Fault in internal operation of APL\360. RELOAD. 
SEND TYPED RECORD, INCLUDING ALL WORK LEADING TO 
THE ERROR, TO THE SYSTEM MANAGER. 

Use of name which has not been assigned a value. 
ASSIGN A VALUE TO THE VARIABLE, OR DEFINE THE 
FUNCTION. 

Workspace is filled (perhaps by temporary values 
produced in evaluating a compound expression) . 
CLEAR STATE INDICATOR, ERASE NEEDLESS OBJECTS, OR 
REVISE CALCULATIONS TO USE LESS SPACE. 
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If an invalid statement is encountered during execution 
of a defined function, the error report includes the 
function name and the line number of the invalid statement. 
The recommended procedure at this point is to enter a ngnr. 
arrow (+) alone, and then retry with an amended statement. 
The matter is treated more fully in the section on Suspended 
Function Execution. 

Names of primitive functions. The primitive functions of 
the" language are summarized in Tables 3.2 and 3.8, ana win 
be discussed individually in subsequent sections. The tables 
show one suggested name for each function. This is not 
intended to discourage the common mathematical practice ot 
vocalizing a function in a variety of ways (for example, 
X*Y may be expressed as "* divided by I", or "X over I ). 
Thus, the expression P M yields the dimension of the array n, 
but the terms size or shape may be preferred both for their 
brevity and for the fact that they avoid potential confusion 
with the dimensionality or rank of the array. 

The importance of such names and synonyms diminishes 
with familiarity. The usual tendency is toward the use of 
the name of the symbol itself (e.g., "rho" (p) for "size , 
and "iota" (i) for "index generator"), probably to avoid 
unwanted connotations of any of the chosen names. 

SCALAR FUNCTIONS 

Each of the primitive functions is classified as either 
scalar or mixed. Scalar functions are defined on scalar 
liTe., individual) arguments and are extended to arrays in 
four ways: element-by-element, reduction, inner product, and 
outer product, as described in the section on Functions on 
Arrays. Mixed functions are discussed in a later section. 

The scalar functions are summarized in Table 3.2. Each 
is defined on real numbers or, as in the case of the logical 
functions and and or, on some subset of them No functional 
distinction is made between "fixed point" and floating 
point" numbers, this being primarily a matter of the 
Representation in a particular medium, and the user of the 
terminal system need have no concern with such questions 
unless his work strains the capacity of the machine with 
respect to either space or accuracy. 

Three different representations for numbers are used 
internally, and transformations among them are carried out 
automatically. Integers less than 2 to the power 52 are 
carried with full precision; larger numbers ana non- integers 
are carried to a precision of about 16 decimal digits. 
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Monadic form fB 



Dyadic form AfB 



Definition 
or example 



+ B ■*•+ 0+B 
-B *-->■ 0-B 
xB «--»• (fl>0)-(B<0) 



B 



3. 14 
'3. 14 



rs 



4 
"3 



LS 



3 

"4 



*B -*--»■ (2 . 71828. . )*B 
®*# -*--»■ # -«--> *®# 

|~ 3, 14 «--> 3.14 



Name 



Name 



! «--► 1 

! B ■*-■> S x ! S - 1 

or !B •*■-> Gamma(B+l) 

?B «--»■ Random choice 
from \B 

OB +■-+ Bx3. 14159.,. 

~1 -e--> ~0 -<— ►! 



Plus 

Negative 

Signum 

Reciprocal 

Ceiling 

Floor 

Exponential 

Natural 
logarithm 

Magnitude 



Factorial 

Roll 

Pi times 
Not 



(-A)OB 


A 


i4oB 


( 1-3*2)*.. 5 





( 1-B*2 )*„ 5 


Arc sin B 


1 


Sine B 


Arccos B 


2 


Cosine B 


Arctan B 


3 


Tangent B 


( 1+B*2 )*. 5 


4 


( 1+B*2)*„ 5 


Arcsinh B 


5 


Sinh B 


Arccosh B 


6 


COsh B 


Arctanh B 


7 


Tanh B 



Table of Dyadic o Functions 



A 
V 
!V 



Plus 

Minus 

Times 

Divide 

Maximum 

Minimum 

Power 

Logarithm 

Residue 



Binomial 
coefficient 



Deal 
Circular 



And 
Or 
Nand 
Nor 



Less 

Not greater 

Equal 

Not less 

Greater 

Not Equal 



Definition 
or example 



2+3.2 +■■+ 5.2 

2-3.2 *■+ ~1.2 

2x3.2 •*"»■ 6.4 

2*3.2 •*--► 0. 625 

3 T 7 «--> 7 

3L7 «-•*■ 3 

2*3 -*--► 8 

A&B ■*•-*■ Log B base /} 

4®B ■+--»■ (®B)*®/4 



Case 



4*0 

i4 =0 ,B>0 

/4=0,B<0 



4 |B 



B-( U)xLB*U 

B 

Domain error 



4!B «--► (!fl)*(M)x!fl-j4 
2 ! 5 ■«-->■ 1 3 ! 5 ■«--»■ 1 



A Mixed Function (See 
Table 3.8) 

See Table at left 



AvB 



A 


B 


A*B 


AVB 


AnB 














1 





1 





1 


1 


1 








1 


1 


1 


1 


1 


1 






Relations 

Result is l if the 
relation holds, o 
if it does not: 

3<7 «--► 1 

7<3 «--* 



Table 3.2: PRIMITIVE SCALAR FUNCTIONS 
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For operations such as floor and ceiling, and in comparisons, 
a "fuzz" of about 1E~13 is applied in order to avoid anomalous 
results that might otherwise be engendered by doing decimal 
arithmetic on a binary machine. 

In a CLEAR workspace the final ten bits in the binary repre- 
sentations of the arguments are ignored during a comparison. This 
fuzz of ten bits can be changed by )COPY 1 WSFNS SETFUZZ and 
SETFUZZ n, where n is an integer between and 31, inclusive. 
SETFUZZ changes the number of bits ignored to n and returns the 
previous value as a result. 

Floor and ceiling are compatible with comparisons. If I 
is an integer and the \E is less than .5, then I equals I + E 
within fuzz implies the floor and ceiling of I + E will be I. 
(This assertion is only roughly true because of the hexadecimal 
arithmetic of the IBM System/360.) 

Two of the functions of Table 3.2, the relations * and =, 
are defined on characters as well as on numbers. 

Monadic and dyadic functions. Each of the functions defined in 
Table 3.2 may be used in the same manner as the familiar arithmetic 
functions + - * and *. Most of the symbols employed may denote 
either a monadic function (which takes one argument) or a dyadic 
function (which takes two arguments) . For example, l~Y denotes the 
monadic function ceiling_ applied to the single argument J, and 
X[Y denotes the dyadic function maximum applied to the two argu- 
ments X and I. Any such symbol always denotes a dyadic function 
if possible, i.e., it will take a left argument if one is present. 

At this point it may be helpful to scrutinize each of the 
functions of Table 3.2 and to work out some examples of each, 
either by hand or on a terminal. However, it is not essential 
to grasp all of the more advanced mathematical functions (such 
as the hyperbolic functions sinh, cosh, and tanh, or the extension 
of the factorial to non-integer arguments) in order to proceed. 
Treatments of these functions are readily available in standard 
texts . 

Certain of the scalar functions deserve brief comment. The 
Residue function 4 | B has the usual definition of residue used in 
number theory. For positive integer arguments this is equivalent 
to the remainder obtained on dividing B by A, and may be stated 
more generally as the smallest non-negative member of the set 
B-NxA, where N is any integer. 

This formulation covers the case of a zero left argument as 
shown in Table 3.2. The conventional definition is extended in 
two further respects: 

1. The left argument A need not be positive; however, the 
value of the result depends only on the magnitude of A. 
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2. The arguments need not be integral. For example, 
1 I 2 . 6 is 0.6 and 1 . 5 j 8 is 0.5. 

The expression ~8*.5 (square root of ~8) yields a domain 
error, but 8*1*3 has the value "2. More generally, for the ex- 
pression C+A*B where A <0 , APL assumes B to be composed of P*Q and 
analyzes for the following cases: 

If p is: and Q is: then C becomes: 

°dd odd -(\A)*B 

Even odd (\A)*B 

Even/Odd Even not defined, 

domain error 

If Q is too large to be determined given the precision limitations 
of the host machine (approx. Q>85) , B is assumed to be irrational; 
in this case C becomes -(\A)*B. 

The factorial function IN is defined in the usual way as the 
product of the first N positive integers. It is also extended to 
non-integer values of the argument N and is equivalent to the 
Gamma function of iV+l. 

The function A\B (pronounced A out of B) is defined as 
( IB)*( lA)x\B-A. For integer values of A and B, this is the number 
of combinations of B things taken A at a time. (It is related to 
the Complete Beta function as follows: 
Beta(F,g) +--*- *G*(P-l)lP+e-l.) 

The symbols < <, = a > and * denote the relations less than, 
!§§§. than or equal, etc., in the usual manner. However, an ex- 
pression of the form A <B is treated not as an assertion, but as a 
function which yields a 1 if the proposition is true, and if it 
is false. For example: 



3<7 
7S3 



When applied to logical arguments (i.e., arguments whose 
values are limited to and 1) , the six relations are equivalent 
to six of the logical functions of two arguments. For example, 
< is equivalent to material implication, and * is equivalent to 
??£iy?ive-or. These six functioni together with the and, or, 
nand, and nor shown in Table 3.2 exhaust the nontrivial logical 
functions of two logical arguments. 

Y§?tors. Each of the monadic functions of Table 3.2 applies to a 
vector, element by element. Each of the dyadic functions applies 
element by element to a pair of vectors of equal dimension or to 
one scalar and a vector of any dimension, the scalar being used 
with each component of the vector. For example: 

12 3 4x4 3 2 1 

4 6 6 4 

2+1 2 3 4 
3 4 5 6 

12 3 4T2 
2 2 3 4 
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l5.4f?L 2®5f£?t°^* If ff is a non-negative integer, then \N denotes 
a vector of the first N integers. The dimension of the vector \N 
is therefore Ni in particular, il is a vector of length one which 
has the value 1, and iO is a vector of dimension zero, also called 
an empty vector. The empty vector prints as a blank. For example: 



Empty vector prints as a blank 



i4 
12 3 4 

15 
12 3 4 5 

iO 

6-i6 
5 4 3 2 10 

2xt0 Scalar applies to all (i.e., 0) elements 
of iO, resulting in an empty vector 

2xt6 
2 4 6 8 10 12 

The index generator is one of the class of mixed functions to 
be treated in detail later; it is included here because it is 
useful in examples. 

DEFINED FUNCTIONS 

Introduction. It would be impracticable and confusing to attempt 
to include as primitives in a language all of the functions which 
might prove useful in diverse areas of application. On the other 
hand, in any particular application there are many functions of 
general utility whose use should be made as convenient as possible. 
This need is met by the ability to define and name new functions, 
which can then be used with the convenience of primitives. 

This section introduces the basic notions of function defi- 
nition and illustrates the use of defined functions. Most of the 
detailed mechanics of function definition, revision, and display, 
are deferred to the succeeding section. 

The sequence 

V SPHERE 
[1] 5yi?Ft-4x3 ,14159xi?xi? 
[2] V0L+-SURF*R±3 
C3] V 

is called a function definition; the first v (pronounced del) marks 
the beginning of "the definition and the second v marks the con- 
clusion: the name following the first 7 (in this case SPHERE) is 
the name of the function defined, the numbers in brackets are 
statement numbers, and the accompanying statements form the body 
of~the function definition. 



3.9 



The act of defining a function neither executes nor 
checks for validity the statements in the body; what it does 
is make the function name thereafter equivalent to the body. 
For example: 



VSPHERE 
[1] SURF+^xZ, 14 
[2] VOL+SURFxR* 
[3] V 

i?-*-2 

R 
2 

SURF 
VALUE ERROR 

SURF 

A 

SPHERE 

SURF 
50„ 26544 

VOL 
33, 51029333 

R+l 

SPHERE 

SURF 
12 „ 56636 

VOL 
4 . 188786667 



159xR*R 
3 



Definition of the 
function SPHERE 



Specification and display 
of the argument R 

SURF has not been 
assigned a value 



Execution of SPHERE 
SURF and VOL now have 
values assigned by the 
execution of-SPHERE 

Use of SPHERE for 
a new value of the 
argument R 



Branching. Statements in a function are normally executed 
in the order indicated by the statement numbers, and 
execution terminates at the end of the last statement in the 
sequence. This normal order can be modified by branches. 
Branches make possible the construction of iterative 
procedures. 

The expression -+4 denotes a branch to statement 4 and 
causes statement 4 of the function to be executed next. In 
general, the arrow may be followed by any expression which, 
to be effective, must evaluate to an integer. This value is 
the number of the statement to be executed next. If the 
integer lies outside the range of statement numbers of the 
body of the function, the branch ends the execution of the 
function. 

If the value of the expression to the right of a branch 
arrow is a non-empty vector, the branch is determined by its 
first component. If the vector is empty (i.e., of zero 
dimension) the branch is vacuous and the normal sequence is 
followed. 
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The following examples illustrate various methods of 
branching used in three equivalent functions (SUM, SUM1, and 
sumo) for determining S as the sum of the first N integers: 





VSUM 


[1] 


5+-0 


[2] 


j>l 


[3] 


+H-xI<N 


[4] 


S+S + I 


[5] 


I+-I+1 


[6] 


->3 


[7] 


V 




N+l 




SUM 




S 


1 






N+-2 




SUM 




S 


3 






N<-S 




SUM 




S 


15 






VSUM1 


[1] 


S+0 


[2] 


1+1 


[3] 


-*0*\I>N 


O] 


S+S+I 


[5] 


I+I + l 


[6] 


+ 3 


[7] 


V 




N+5 




SUM1 




S 


15 






VSUM2 


CI] 


S«-0 


[2] 


I+-0 


[3] 


S+S + I 


[4] 


I+-I+1 


C5] 


+3x\I<N 


[6] 


V 



Branch to nxi (i.e., 4) or to <4*o (out) 
Unconditional branch to 3 



Equivalent to SUM 

Branch to O(out) or continue to next 
line since 0*i0 is an empty vector 

Unconditional branch to 3 



Equivalent to SUM 



Branch to 3 or fall through (and out) 



From the last two functions in the foregoing example, 
it should be clear that the expression *i occurring in a 
branch may often be read as "if". For example, +3*iI*Nmay 
be read as "Branch to 3 if I is less than or equal to N. 
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I^cal and global variables. A variable is normally global 
in the sense that its name has the same significance no 
matter what function or functions it may be used in. 
However, the iteration counter I occurring in the foregoing 
function SUM is of interest only during execution of the 
function; it is frequently convenient to make such a 
variable local to a function in the sense that it has 
meaning only during the execution of the function and bears 
no relation to any object referred to by the same name at 
other times. Any number of variables can be made local to a 
function by appending each (preceded by a semicolon) to the 
function header. Compare the following behavior of the 
junction SUM3, which has a local variable I, with the 
behavior of the function SUM2 in which I is global: 

VSUM3-,I v SUM2 

Lll S<-0 [:L ] 5 <_ 

[2] I*-0 [2] j^ 

[3] S+S+I [3] S <-S +1 

[5] ->3x t J<il/ [53 -y3*\I<N 

£6] V [ 6] v 

1+20 j^2 



15 
20 



N+5 
S 

S 

I 



N+5 
SUM3 SUM2 

S 



15 



I 



Since I is local to the function SUM3 , execution of SUM3 has 
no effect on the variable I referred to before and after the 
use of SUM3. 

However, if the variable K is local to a function F 
then any function G used within F may refer to the same 
variable K, unless the name K is further localized by beinq 
made local to G. For further treatment of this matter, see 
the section on Homonyms. 
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Explicit argument. A function definition of the form 

VSPH X 
[1] SUE<- t 4x3. 14159xZxZ 
[2] V 

defines SPH as a function with an explicit argument; 
whenever such a function is used it must be provided with an 
argument. For example: 

SPH 2 

SUR 
50„ 2654H 

SPH 1 

SUR 
12 . 56636 

Any explicit argument of a function is automatically 
made local to the function; if E is any expression, then the 
effect of SPH E is to assign to the local variable X the 
value of the expression E and then execute the body of the 
function SPH. Except for having a value assigned initially, 
the argument variable is treated as any other local variable 
and, in particular, may be respecified within the function. 

Explicit result. Each of the primitive functions produces a 
result and may therefore appear within compound expressions. 
For example, the expression tZ produces an explicit result 
and may therefore appear in a compound expression such as 
I+vZ, A function definition of the form 

VZ+SP X 
[1] Z^x3„ 14159x*x* 

[2] V 

defines SP as a function with an explicit result; the 
variable Z is local, and the value it assumes at the 
completion of execution of the body of the function is the 
explicit result of the function. For example: 

Q+-3*SP 1 

Q 
37, 69908 

R+-2 

(SP R)xR*3 
33. 51029333 
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SfvT?-?- g - Refined functions. Functions may be defined 
sn ™ih-2 r e ^ llc1 ^ ar g ument s and either with or without 
an explicit result. The form of header used to define each 
or these six types is shown in Table 3.3. Each of the six 
torms permits the appending of semicolons and names to 
introduce local variables. The names appearing in any one 
header must all be distinct; e.g., the header Z+F Z is 
invalid. 



Number of 
Arguments 


Number of Results 

1 




1 

2 _. 


VF Y 
VX F Y 


VZ+F 
1Z+F J 
VZ+X F Y 



Table 3.3: FORMS OF DEFINED 
FUNCTIONS 



* *• ^ i S not obli< 3 at °*Y either for the arguments of a 
defined function to be used within the body, or for the 
r ^u.a varia t>le to be specified. A function definition 
which does not assign a value to the result variable will 
engender a value error report when it is used within a 
compound expression. This behavior permits a function to be 
defined with a restricted domain, by testing the argument (s) 
and branching out in certain cases without specifying a 
result. For example: y 

VZ+-SQRT X 
Cl] +0x t ^<0 

C2] Z«-Z*,5V 

Q+-SQRT 16 

Q 
4- 

Q+SQRT "16 
VALUE ERROR 

Q+-SQRT "16 
A 
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Use of defined functions. A defined function may be used in 
the same ways that a primitive function may. In particular, 
it may be used within the definition of another function. 
For example, the function HYP determines the hypotenuse of a 
right triangle of sides A and B by using the square root 
function SQRTz 

1Z+SQRT X 
[1] Z«-JT*.5V 

VH+A HYP B 
[1] H+-SQRT (4*2)tB*2V 



5 HYP 12 



13 



A defined function must be used with the same number of 
arguments as appear in its header. 

Recursive function definitiQn^ A function F may be used in 
the body of its own definition, in which case the function 
is said to be recursively defined. The following program 
FAC shows a recursive definition of the factorial function. 
The heart of the definition is statement 2, which determines 
factorial N as the product of N and FAC N-l, except for the 
case N = when it is determined (by statement 4) as 1: 





VZ+-FAC N 


[1] 


->4xiW=0 


[2] 


Z+NxFAC N-l 


[3] 


+ 


[4] 


Z-+-1V 



Trace control. A trace is an automatic type-out of 
information generated by the execution of a function as it 
progresses. In a complete trace of a function P, the number 
of each statement executed is typed out in brackets, 
preceded by the function name P and followed by the final 
value produced by the statement. The trace is useful in 
analyzing the behavior of a defined function, particularly 
during its design. 

The tracing of P is controlled by the trace vector for 
P, denoted by TAP. If one types 7AP^2 3 5 then statements 
2, 3, and 5 will be traced in any subsequent execution of P. 
More generally, the value assigned to the trace vector may 
be any vector of integers. Typing TAP+-0 will discontinue 
tracing of P. A complete trace of P is set up by entering 
Tt\P<-iN r where N is the number of statements in P. 
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MECHANICS OF FUNCTION DEFINITION 

When a function definition is Opened (by typing a V followed 
by a header) , the system automatically types successive statement 
numbers enclosed in brackets and accepts successive entries as the 
statements forming the body of the definition. The system is 
therefore said to be in definition mode, as opposed to the execu- 
tion mode which prevails outside~of function definition. 

If a WS FULL error occurs while in function definition mode, 
the system prints the next statement number and waits for the 
statement to be entered. The function, however , cannot be closed 
because there is not enough room in the workspace to accept the 
closing del. To close the function, existing lines must be 
deleted, items in the workspace (including the function in ques- 
tion) must be )ERASEd, or the active workspace must be )CLEARed 
or )LOADed. 

There are several devices which may be used during function 
definition to revise and display the function being defined. After 
function definition has been closed, there are convenient ways to 
re-open the definition so that these same devices may be used for 
further revision or display. 

Labels. If a statement occurring in the body of a function defi- 
nition is prefaced by a name and a colon, then at the beginning of 
execution the name is assigned a value equal to the statement, num- 
ber. A variable specified in this way is called a label. Labels 
are used to advantage in branches when it is expected that a func- 
tion definition may be changed for one reason or another, since 
a label automatically assumes the new value of the statement num- 
ber of its associated statement as statements are inserted or 
deleted. 

Labels are like local variables, except that (1) they must 
not appear in the function header (2) values can not be specified 
for them explicitly, and (3) if a suspended function (see "Sus- 
pended Function Execution") is edited, values are assigned to its 
labels at the conclusion of editing. 

Revision. Any statement number (including one typed by the system) 
can be overridden by typing [N], where N is any positive number 
less than 10000, with or without a decimal point and with at most 
four digits to the right of the decimal point. If N is zero, it 
refers to the header line of the function. 

If any statement number is repeated, the statement following 
it supersedes the earlier specification of the statement. If any 
statement is empty — that is, the bracketed statement number was 
immediately followed by both a linefeed and a carriage return (a 
carriage return alone is vacuous) — it is deleted. 

When the function definition mode is ended, the statements 
are reordered according to their statement numbers and the state- 
ment numbers are replaced by the integers 1,2,3, and so on. 

The particular statement on which the closing v appears is 
not significant, since it marks only the end of the definition 
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mode, not necessarily the last line of the function. Moreover, 
the closing 7 may be entered either alone or at the end of a 
statement. 

Display. During function definition, statement N can be displayed 
by overriding the line number with CND]. After the display, the 
system awaits replacement of statement N. Typing CD] displays the 
entire function, including the header and the opening and closing 
V, and awaits entry of the next statement; typing [DN] displays 
all statements from N onward and awaits replacement of the last 
statement. Executing an attention signal will stop any display. 

Line edi.ti.ng_. During function definition, statement N can be 
modified by the following mechanism: 

1. Type [NQM] where M is an integer. 

2. Statement N is automatically displayed and the carriage 
stops under position M. 

3. A letter or decimal digit or the symbol / may be typed 
under any of the positions in the displayed statement. Any 
other characters typed in this mode are ignored. The 
ordinary rules for backspace and linefeed apply. 

4. When the carriage is returned, statement N is re- 
displayed. Each character understruck by a / is deleted, 
each character understruck by a digit K is preceded by K 
added spaces, and each character understruck by a letter is 
preceded by 5*i? spaces, where R is the rank of the letter in 
the alphabet. However, if the number of added spaces plus 
the current number of characters in the line would exceed 
130, the spaces are not inserted and a DEFN ERROR occurs. 
Finally, the carriage moves to the first injected space 

and awaits the typing of modifications to the statement in 
the usual manner^ The final effect is to define the state- 
ment exactly as if the entry had been made entirely from the 
keyboard; in particular, a completely blank sequence leaves 
the statement unchanged. 

If the statement number itself is changed during the editing 
procedure, the statement affected is determined by the new state- 
ment number; hence statement N remains unchanged. _ This permits 
statements to be moved, with or without modification. 

Reopening function definition. If a function R is already 
defined, the definition mode for that function can be re- 
established by entering v 2? alone; the rest of the function header 
must not be entered. The system responds by typing [tf+i], where 
N is the number of statements in R. Function definition then pro- 
ceeds in the normal manner. 
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Function definition may also be established with editing or 
display requested on the same line. For example, V i?[3 1X+X+1 
initiates editing by entering a new line 3 immediately. The sys- 
tem responds by typing [4] and awaiting continuation. The entire 
process may be accomplished on a single line. Thus, V i?[ 3 1X+X+V7 
opens the definition of R, enters a new line 3, and terminates the 
definition mode. Also, Vi?CD]V causes the entire definition of R 
to be displayed, after which the system returns to execution mode. 

Similar expressions involving display are also permissible, 
for example, Vi?[Q3Jv or V ACQ] or v i?[2DlO] . 

Locked functions. If the symbol 9 (formed by a V over struck with 
a ~ and called del-tilde) is used instead of v to open or close 
a function definition, the function becomes locked. A locked 
function cannot be revised or displayed. Moreover, the associated 
stop control (see next section) and trace control vectors cannot 
be changed after the function is locked. 

Locked functions are used to keep a function definition 
proprietary. For example, in an exercise in which a student is 
required to determine the behavior of a function by using it for a 
variety of arguments, locking a function prevents him from dis- 
playing its definition. 

When an error is encountered in a locked function FL, execu- 
tion of FL is abandoned. If FL was invoked by a locked function, 
it abandons execution of that function also, and so on, until 
there is reached either (1) a statement in an unlocked function 
FU or (2) an input statement. Then 'FL ERROR' is printed on the 
terminal. In case (1) the execution of FU is suspended at the 
statement. In case (2) the system awaits input. 

P?l§tion of functions and variables. A function F or a variable 
F is deleted by the command )ERASE F. A function may be deleted, 
whether locked or not, by the erase command. 

§YJ?'!i?E E? 1 !}????}^ §Dt§£?<* ^H-EiB? function definition. A system 
command entered during function definition will not be accepted 
as a statement in the definition. Some commands, such as )COPY, 
will be rejected with the message NOT WITH OPEN DEFINITION (see 
Table 2.1); most will be executed immediately. 
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SUSPENDED FUNCTION EXECUTION 

Suspensien. The execution of a function F may be stopped 
before completion in a variety of ways: by an error report, 
by an attention signal, or by the stop control vector bit 
treated below. In any case, the function is still active 
and its execution can later be resumed. In this state tne 
function is said to be suspended. Typing +K will cause 
execution of the suspended function to be resumed, beginning 
with statement K. 

Whatever the reason for suspension, the statement or 
statement number displayed is the next one to have been 
executed. A branch to that statement number will cause 
normal continuation of the function execution, ana a branch 
out (->0) will terminate execution of the function. 

The function i2 6 (described in the section on System 
Dependent Functions) yields the number of the statement next 
to be executed. Hence the expression ^i 2 6 provides a safe 
and convenient way to cause normal resumption of execution. 

In the suspended state all normal activities are 
possible. In particular, the system is in a condition to: 

1. execute statements or system commands. 

2. resume execution of the function at an arbitrary 
point N (by entering +N) . 

3. reopen the definition of any function which is not 
pendent. The term pendent is defined in the 
discussion of the state indicator below. 

If function execution is interrupted by a disconnect, 
the function is suspended and the resulting active workspace 
is automatically saved under the name CONTINUE, as notea in 
Part 2. 

State indicatsr. Typing )SI causes a display of the state 
indicator; a typical display has the following form: 

)SI 

Hill * 

ff[2] 

FC3] 

The foregoing display indicates that execution was 
halted just before executing statement 7 of the function a, 
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functSn S fS i-w S Action ff was invoked in statement 2 of 
statement k S V Jv, USS ° f function <? was in turn invoked in 
?hat She function /*" * a PP e * r i n 5 to the r ^ht of ff[7] indicates 
to L ^J"^ tl0n B 1S sus P end ed; the functions ff and F are said 



to be pendent. 



Thus if U r fc S^ functions , can be invoked when in the suspended state 

st temfnt Til T \IZ^ *"? 5 fUrther sus P e ^°n occurred in 
statement 5 of Q, itself invoked in statement 8 of G, a subseauent 
display of the state indicator would appear as follows? SUbSequent 



CC5] 
GC8] 
HI 7 1 
GL21 
F[3] 



)SI 



The entire sequence from the last to the precedina susoen- 
sion can be cleared by typing a branch with no argument (t£a? is 
Ixampiras^IoSs: 15 ±11UStrated ^ continuing tL fore^inj 1S ' 



)SI 
Hill * 
ff[2] 
F[3] 



Repeated use of -+ will clear the state indicator completely The 
cleared state indicator displays as a blank line. ° mpleteiy - The 

State Indicator Damage. An SI DAMAGE report is printed at the 
terminal when one of the following occurs: P rin ^a at the 

• The function FN is edited and FN occurs in the state 
indicator list but not at the top. 

• FN occurs (anywhere) in the state indicator list and an 
)ERASE FN or )COPY FN command is executed? 

• FN occurs (anywhere) in the state indicator list and its 
edging" 3 ^ °* ^ ° rder ° f itS labels is changed Jy 

New executions of FN can be initiated safely after the reoort i«. 
received; only suspended executions of FN may be affected The 

llTFTtuliTntUV 6nter * at leaSt —* "™ S'Slmin^e 

!!? E g f?-fS-;.t T ?n S 2 * Y --"- f ° r a function p is ^noted by 
niv'r t set in the same manner as the trace vector (i.e bv 

conJrollSf^anSMo^ " * S ? ecifies the numbers of the s^ements 
controlled) , and stops execution just before each of the specified 
statements At each stop, the function Time and the line numbfr 
of the statement next to be executed are printed. After the stop 
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the system is in the normal suspended state; resumption of execu- 
tion may therefore be initiated by a branch. 

Trace control and stop control can be used in conjunction. 
Moreover, either of the control vectors may be set within functions. 
In particular, they may be set by expressions which initiate 
tracing or halts only for certain values of certain variables. 
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HOMONYMS 

Y§£ij&ble names. The use of local variables introduces the 
possibility of having more than one object in a workspace 
with the same name. Confusion is avoided by the following 
rule; when a function is executed, its local variables 
supersede, for the duration of the execution, other objects 
of the same name. A name may, therefore, be said to have 
one active referent and (possibly) several latent referents. 

The complete set of referents of a name can be 
determined with the aid of the SIV list (state indicator 
with local variables) , whose display is initiated by the 
command )SIV. The SIV list contains the information 

provided by the command )SI , augmented, by the names of the 
variables local to each function. A sample display follows: 



Gill 

em 

R121 
GL31 



)SIV 

* Z X 

P J 

* C X 

p 

Z X 



I 



I 



If the SIV list is scanned downward, from the top, the 
first occurrence of a variable is the point at which its 
active referent was introduced; lower occurrences are the 
points at which currently latent referents were introduced; 
and if the name is not found at all, its referent is global, 
and should be sought for with the commands )FNS . )VARS, or 
)GRPS. 

As the state indicator is cleared (by ->•, or by the 
continuation to completion of halted functions) , latent 
referents become active in the sequence summarized, for the 
preceding SIV list, by the following diagram: 



G 

F 

Q 

R 

G 

Global 



ZXIPJCTAB 

+ + H I I I 



I + 
I I 



I i + I I 

M I w 



+ + + >l- + + 



The currently active referent of a name holds down to 
and including the execution of the function listed at the 
point of the first arrow, because of localization of the 
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name within that function. The first latent referent 
becomes active when that function is completed, and holds 
down to the next arrow; and so forth until the state 
indicator is completely cleared, at which point there are no 
longer any latent referents, and all active referents are 
global objects. 

Function names. All function names are global. In the 
f Brigolng example, therefore, a function named P cannot be 
used within the function R or within any of the functions 
employed by R. since the local variable name P makes tne 
function P inaccessible. However, even in such 
circumstances, the openina of function definition for such a 
function p is possible. (Moreover, as stated in Part ^, 
system commands concern global objects only, regardless o£ 
the current environment. ) 

This scheme of homonyms is easy to use and relatively 
free from pitfalls. It can, however, lead to seeming 
anomalies as indicated by the following example (shown to 
the authors by J.C.Shaw) of two pairs of functions which 
differ only in the name used for the argument: 



Cl] 
[l] 



VZ-<-F X 
Z-KT+YV 

VZ<-G Y 
Z+-F YV 
Y-t-3 
G 4 



Cl] 
Cl] 



VZ«-F X 
Z+-X + YV 

VZ+-G R 
Z+-F i?V 
Y+-3 
G 4 



INPUT AND OUTPUT 



amoun 
years: 



The following function determines the value of an 
t A invested at interest SCI] for a period of #L^J 



VZ+-A CPI B 
Cl] Z+Axd+.OlxFCl] )*SC2]V 

For example: 

10 00 CPI 5 4 
1215. 50625 
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The casual user of such a function might, however, find 
it onerous to remember the positions of the various 
arguments and whether the interest rate is to be entered as 
the actual rate (e.g., .05) or in percent (e.g., 5). An 
exchange of the following form might be more palatable: 

CI 
ENTER CAPITAL AMOUNT IN DOLLARS 
D: 

1000 
ENTER INTEREST IN PERCENT 
D: 

5 
ENTER PERIOD IN YEARS 
0: 

4 
RESULT IS 1215.50625 

It is necessary that each of the keyboard entries 
(1000, 5, and 4) occurring in such an exchange be accepted 
not as an ordinary entry (which would only evoke the 
response 1000, etc.), but as data to be used within the 
function CI. Facilities for this are provided in two ways, 
termed evaluated input, and character input. 

The definition of the function CI is shown at the end 
of this section. 

Evaluated input. The quad symbol D appearing anywhere other 
than immediately to the left of a specification arrow 
accepts keyboard input as follows: the two symbols Q: are 
printed, the paper is spaced up one line, and the keyboard 
unlocks. Any valid expression entered at this point is 
evaluated and the result is substituted for the quad. For 
example: 

[1] Z^4-x[>2 
C2] V 

F 

U: 

36 

D: 

9 



3 
F 
3*2 
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An invalid entry in response to request for a quad input 
induces an appropriate error report, after which input is again 
awaited at the same point. A system command entered will be 
executed, after which (except in the case of one which replaces 
the active workspace) a valid expression will again be awaited. 
An empty input (i.e., a carriage return alone or spaces and a 
carriage return) is rejected and the system again prints the symbols 
D: and awaits input. 

The symbols Q: are printed to alert the user to the type of 
input expected. 

Character input. The quote-quad symbol D (i.e., a quad overstruck 
with" a "quote) "accepts character input: the keyboard unlocks at 
the left margin and data entered are accepted as characters. For 
example: 

CAN'T (Quote-quad input, not indented) 

X 

CAN'T 

Escape from input loog. If evaluated or character input occurs 
within IrTindless loop in a function, it may be impossible to 
escape by the usual device of striking the attention button. 
Escape from input can be achieved by entering ■*. Escape from 
IE input can be achieved by typing the three letters OUT, in that 
order, but with a backspace between each pair so that they all 
overstrike. The effect is exactly as if the symbol - were entered 
while suspended. 

Normal output. The quad symbol appearing immediately to the left 
of"a~£pecTITc~ation arrow indicates that the value of the expression 
to the right of the arrow is to be printed. Hence, U+X is equiv- 
alent to the statement X. The longer form Q+-Z is useful when 
employing multiple specification. For example, Q+Q+X*2 assigns 
to Q the value X*2 and then prints the value of X*2. 

The page width (measured in characters) may be set to any 
value N in the range 3 0-130 by entering the command ) WIDTH N. 
It may also be set by the library function WIDTH which may be 
used within a defined function. (See Part 4.) 

Heterogeneous output. A sequence of expressions separated by 
limi-co Ions "will cause the values of the expressions to be 
printed, with no intervening carriage returns or spaces except 
those implicit in the display of the values. 

The primary use of this form is for output in which some 
of the expressions yield numbers and some yield characters. For 
example, if X+2 It, then: 

'THE VALUE OF X IS ' ;X 
THE VALUE OF X IS 2 14 
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A further example of mixed output is furnished by the defi- 
nition of the function CI which introduced the present section: 

V CI;A;I;Y 

[13 'ENTER CAPITAL AMOUNT IN DOLLARS 1 

[23 A+U 

[3 3 ' ENTER INTEREST IN PERCENT 1 

[43 i>£] 

[53 » ENTER PERIOD IN YEARS » 

[ 6 3 I*U 

[73 'RESULT IS ' ;/4x(l+.01xJ)*JV 

rectangular arrays 

introduction.. A single element of a rectangular array can be 
selected by specifying its indices; the number of indices required 
is called the dimensionality or rank of the array. Thus a vector 
is of rank 1, a matrix (in which the first index selects a row 
and the second a column) is of rank 2, and a scalar (since it 
permits no selection by indices) is an array of rank 0. Rectan- 
gular arrays of higher rank may be used, and are called 3- 
dimensional, 4-dimensional, etc. 

This section treats the reshaping and indexing of arrays, 
and the form of array output. The following section treats the 
four ways in which the basic scalar functions are extended to 
arrays, and the next section thereafter treats the definition of 
certain mixed functions on arrays. 

Yf'ctqrs, dimension, catenation, lamination. If X is a vector, 
then pX denotes its dimension. For example, if X+2 3 5 7 11, 
then pX is 5, and if Y+'ABC , then pi is 3, A single character 
entered in quotes or in response to a H input is a scalar, not 
a vector of dimension 1; this parallels the case of a single num- 
ber, which is also a scalar. 

?§tenatign. Catenation joins two variables along an existing 
coordinate. For example, two vectors may be catenated: If 
X*-2 3 5 and J«-10 4, then X,Y equals 2 3 5 10 4. A vector and a 
scalar may be catenated; if X<-2 3 5 and S-f-4 , then X,S is 2 3 5 4. 
Strictly speaking, two scalar s may be laminated but not cate- 
nated. 

In general, two arrays may be catenated along an existing coordi- 
nate. The syntax for catenation is j4,[J3B or A,B. A ,B is short 
for A , [ T/( ippA ) , \ppB3B except when A and B are both scalars. For 
example, in 1-origin, if A*-2 3pi6 and B+-2 3p23 5 1047, then 



and 



A,B 






12 3 2 


3 


5 


4 5 6 10 


4 


7 


A.illB 






12 3 






4 5 6 






2 3 5 






4 7 
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If ppA equals ppS, then catenation requires that I be an element 
of \ppA and that the corresponding dimensions of A and B be the 
same except the Ith. The dimension vector of the result is the 
same as the dimension vectors of the arguments except that the Ith 
coordinate is obtained by adding their corresponding coordinates. 
In the example above U,B)[;i 3] equals A and M,B)[;3 + i3] 
equals B. 

If A and B do not have the same rank, then their ranks must differ 
by one, or either A or B must be a scalar. 

If B, for example, has one fewer coordinates than A, then pB must 
equal ( I*\ppA ) /pA . In this case a unit Ith coordinate is inserted 
into pB. Hence, rows and columns can be added to matrices.. For 
example, if B-<-24 3 9 and A is the same as above, then 

A,B 
1 2 3 24 
4 5 6 39 

If B, for example, is a scalar, then it is extended to have the 
same dimensions as A except along the Ith coordinate on which it 
is given unit length. If A is the same as above and B«-2 9, then 

A,[1]B 

12 3 

4 5 6 

29 29 29 

An attempt to catenate an array of more than 24 dimensions results 
in a NONCE ERROR. For example: 





M<-( 25p 


Dp 


M' 




M 






A 


ppM 






25 


M.'.A' 






NONCE 


ERROR 
M, M» 

A 







Lamination. Lamination joins two variables along a new coordinate. 
The syntax for lamination is A,B or A, LI IB. If A and B are both 
scalars, then A,B yields a two-element vector. For all other cases 
the form A ,111b must be used. 

Lamination requires that either the dimension vectors of A and B 
be the same or that A or B be a scalar. In the first case (pA 
equals pB) lamination requires that the expression (I*LI)a 
(I>~l + il)A(I<l + r/ippi , l) evaluate to unity. The operation inserts, 
before the (TDth coordinate (or after the (LI) th coordinate), a 
new coordinate which always has the range i2 and is used to 
distinguish between elements from A and elements from B. For 
example, in 1-origin, if A+2 3p x6 and B+-2 3p23 51047, then 
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A, I .5]B 
12 3 
4 5 6 

2 3 5 

10 4 7 

A, LI. SIB 

1 2 3 

2 3 5 

4 5 6 
10 4 7 

A.L2.51B 

1 2 

2 3 

3 5 

4 10 

5 4 

6 7 

If B, for example, is a scalar, then the operation /t,[:L.6]B would 
be tantamount to 4 , [ l 6 ] ( p4 ) p B . 

An attempt to laminate an array of more than 24 dimensions results 
in a NONCE ERROR. For example: 

M<r( 24pl)p M' 

M-Htf , [ . 5 ] M ' 

ppM 
25 

M-*-W,C .5] 'A' 
NONCE ERROR 

M+M,l 0.5] M» 

A 

Matrices,, dimension, ravel. The monadic function p applied to an 
array A yields the size of A, that is, a vector whose components 
are the dimensions of A. For example, if A is the matrix 

12 3 4 
5 6 7 8 
9 10 11 12 

of three rows and four columns, then pA is the vector 3 4. 

Since pA contains one component for each coordinate of A, 
the expression ppA is the rank of A. Table 3.4 illustrates the 
values of pA and ppA for arrays of rank (scalars) up to rank 3. 
In particular, the function p applied to a scalar yields an empty 
vector. 
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Type of Array 


pA 


ppA 


pppA 


Scalar 
Vector 
Matrix 
3-Dimens ional 


N 

M N 
L M N 



1 
2 
3 




1 
1 
1 
1 



Table 3.4: DIMENSION AND RANK VECTORS 

The monadic function ravel is denoted by a comma; when 
applied to any array A it produces a vector whose elements are the 
elements of A in row order. For example, if A is the matrix 



2 
10 

18 



4 
12 
20 



6 

14 

22 



16 
24 



and if V-r,A then V is a vector of dimension 12 whose elements are 
the integers 2 4 6 8 10 12 ... 24. If A is a vector, 
then ,A is equivalent to 4; if A is a scalar, then ,A is a vector 
of dimension 1. 

Reshape. The dyadic function p reshapes its right argument to the 
dimension specified by its left argument. If M+-DpV, then M is an 
array of dimension D whose elements are the elements of V. For 
example, 2 3pl 2 3 t 5 6 is the matrix 



1 

4 



If N, the total number of elements required in the array 
DpV , is equal to the dimension of the vector V, then the ravel of 
Dp V is equal to V. If N is less than pV, then only the first N 
elements of V are used; if N is greater than pV , then the elements 
of V are repeated cyclically. For example, 2 3pl 2 is the matrix 



and 3 3pl is the identity matrix 



1 











1 











1 
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More generally, if A is any array, then Do A is 
equivalent to Dp ,A . For example, if A is the matrix 

12 3 

4 5 6 

then 3 5py4 is the matrix 

12 3 4 5 
6 12 3 4 

5 6 12 3 

The expressions OpZ and 3p* and 3 Op* and OpJ are 
ail valid; any one or more of the dimensions of an array may 
be zero. 



Uses of empty arr_ay_s. A vector of dimension zero contains 
no components and is called an _emp_ty ^^c_fcojr„ Three 
expressions which yield empty vectors are iO and ' ' and p 
applied to any scalar. An empty vector prints as a blank 
line. 

One important use of the empty vector has already been 
illustrated: when one occurs as the argument of a branch, 
the effect is to continue the normal sequence. 

The following function for determining the 

representation of any positive integer N in a base B number 

system shows a typical use of the empty vector in 

initializing a vector Z which is to be built up by 
successive catenations: 

VZ+-B BASE N 
[1] Z + iO 
[2] Z+(B\N),Z 
[3] N+LN*B 
[4] ->2xtf>0V 

10 BASE 177 6 
17 7 6 

8 BASE 17 76 
3 3 6 

Empty arrays of higher rank can be useful in analogous 
ways in conjunction with the expansion function described in 
the section on Mixed Functions. 



3.30 



Indexing. If X is a vector and I is a scalar, then XII] 
denotes the jth element of X. For example, if X+-2 3 5 7 11 
then XL 2] is 3 . 

If the index J is a vector, then XL II is the vector 
obtained by selecting from X the elements indicated by 
successive components of I. For example, Xll 3 5] is 
2 5 11 and *[ 54321] is 117532 and *[i3] is 2 3 5 . 
If the elements of I do not belong to the set of indices of 
X, then the expression XII] induces an index error report. 

In general, pA'Cl] is equal to pi. In particular, if I 
is a scalar, then Xlll is a scalar, and if I is a matrix, 
then XL I] is a matrix. For example: 



214-412414 





A<-'ABCDEFG' 




M-t-4 3p3 1 4 




M 


.3 1 


4 


2 1 


4 


4 1 


2 


4 1 


4 




AIM] 


CAD 




BAD 




DAB 




DAD 





If M is a matrix, then M is indexed by a two-part list 
of the form I; J where I selects the row (or rows) and J 
selects the column (or columns) . For example, if M is the 
matrix 

12 3 4 
5 6 7 8 
9 10 11 12 

then Ml 2; 3] is the element 7 and Mil 3; 2 3 4] is the matrix 

2 3 4 
10 11 12 
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In general, pM[I;<7] is equal to ( P I) )P J. Hence if I 
and J are both vectors, then MU;Jl is a matrix; if both I 
and J are scalars, M[I;J1 is a scalar; if I is a vector and 
J is a scalar (or vice versa), Af[I;j] is a vector. The 
indices are not limited to vectors, but may be of higher 
rank. For example, if I is a 3 by 4 matrix, and J" is a 
vector of dimension 6, then MZI;J1 is of dimension 3 4 6, 
and MLJ;i] is of dimension 6 3 4. m particular, if T and P 
and Q are matrices, and if R«-TIP;Q1, then i? is an array of 
rank 4 and RLl;J;K;Ll is equal to TlPlI ;</] ;Q[ jf;L] ]. 

The form M[I;] indicates that all columns are selected, 
and the form Ml ;Jl indicates that all rows are selected. 
For example, Ml2;l is 5 6 7 8 and Af[ ; 2 1] is 

2 1 

6 5 

10 9 

The following example illustrates the use of a matrix 
indexing a matrix to obtain a three-dimensional array: 

M<rH 3p314214i+124-14 
M 

3 14 
2 14 

4 12 
4 14 



MlMil 



4 12 

3 14 

4 14 

2 14 

3 14 

4 14 

4 14 

3 14 

2 14 

4 14 

3 14 

4 14 
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Permutations are an interesting use of indexing. A 
vector P whose elements are some permutation of its own 
indices is called a ^ejrmutation. of. order, pp. For example, 

3 1 4 2 is a permutation of order 4-. if X is any vector of 
the same dimension as P, then XlPl produces a permutation of 

X. Moreover, if pP is equal to (pM)[l], then MlP-,1 permutes 
the column vectors of M (i.e., interchanges the rows of M) 
and is called a cj^lunm. pejniLUjtatijm.. Similarly, if pP equals 

(pA/)[2], then Ml; Pi is a row pe_rjnujLation. of M. 

^L^exiJia. OIL the. left. An array appearing to the left of a 
specification arrow may be indexed, in which case only the 
selected positions are affected by the specification. For 
example: 

X+-2 3 5 7 11 
Z[l 3]«-6 8 
X 
6 3 8 7 11 

The normal restrictions on indexing apply; in 
particular, a variable which has not already been assigned a 
value cannot be indexed, and an out-of -range index value 
cannot be used. 

Index origin. In lrorigin indexing, Xlll is the leading 
element of the vector X and XlpX] is the last element. In 
O r prigin indexing, XlO] is the leading element and XL 1+pZ] 
is the last. 0-origin indexing is instituted by the command 
) ORIGIN 0. The " command ) ORIGIN 1 restores 1-origin 
indexing. The index origin in effect applies to all 
coordinates of all rectangular arrays. 

The function ORIGIN in Library 1 WSFNS may also be used 
to control the index origin. It may be executed within a 
function. (See Part 4.) 

In certain expressions such as + /U1M and Kfy[J~}M (to be 
treated more fully in the two following sections) , the value 
of J determines the coordinate of the array M along which 
the function is to be applied. Since the numbering of 
coordinates follows the index origin, a change of index 
origin also affects the behavior of such expressions. 

The index origin also affects four other functions, the 
monadic and the dyadic forms of ? and \. The expression \N 
yields a vector of the first N integers beginning with the 
index origin. Hence XLiNl selects the first N components of 
X in either origin. Moreover, i 1 is a one-element vector 
having the value in 0-origin and 1 in 1-origin; i0 is an 
empty vector in either origin. 
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The index origin remains associated with a workspace; 
in particular, the index origin of an active workspace is 
not affected by a copy command. A clean workspace provided 
on sign-on or by the command ) CLEAR is in 1-origin. All 
definitions and examples in this text are expressed in 
1-origin. 

Array output. Character arrays print with no spaces between 
components in each row; other arrays print with at least one 
space. If a vector or a row of a matrix requires more than 
one line, succeeding lines are indented. 

A matrix prints with all columns aligned. A matrix of 
dimension N,l prints as a single column. Arrays are printed 
as planes , with blank spaces separating the planes. 

FUNCTIONS ON ARRAYS 

There are four ways in which the scalar functions of 
Table 3.2 extend to arrays: element-by-element, reduction, 
inner product, and outer product. Reduction and outer 
product are defined on any arrays, but the other two 
extensions are defined only on arrays whose sizes satisfy a 
certain relationship called SQQfQrmability. For the 
element-by- element extension, conformability requires that 
the shapes of the arrays agree, unless one is a scalar. The 
requirements for inner product are shown in Table 3.6. 

Scalar functions. All of the scalar functions of Table 3.2 
are extended to arrays element by element. Thus if M and N 
are matrices of the same size, f is a scalar function, and 
P+MfN, then PLliJ] equals MLI iJifNLl ;J1 , and if Q<-fN, then 
QLI;J] is equal to £NU;J1. 

If M and N are not of the same size, then MfN is 
undefined (and induces a length or rank error report) unless 
one or other of M and IF is a scalar or one-element array, in 
which case the single element is applied to each element of 
the other argument. In particular, a scalar versus an empty 
array produces an empty array. 

An expression or function definition which employs only 
scalar functions and scalar constants extends to arrays like 
a scalar function. 

Eeductign. The sum- re duct iqu of a vector X is denoted by 
+/Z and defined as the sum of all components of X. More 
generally, for any scalar dyadic function f, the expression 
f/X is equivalent to XL l]f XL 2]f . .,f Z[p XI, where evaluation 
is from rightmost to leftmost as usual. A user-defined 
function cannot be used in reduction. 



3.34 



If X is a vector of dimension zero, then f/X yields the 
identity element of the function f (listed in Table 3.5) if 
it exists; if X is a scalar or a vector of dimension 1 , then 
f/X yields the value of the single element of X. 

The result of reducing any vector or scalar is a 
scalar. 



Dyadic 






Identity 


Left- 


Function 






Element 


Right 


Times 


X 


1 




L R 


Plus 


+ 







L R 


Divide 


T 


1 




R 


Minus 


- 







R 


Power 


* 


1 




R 


Logarithm 


® 






None 


Maximum 


r 




7. 237. . ,£75 


L R 


Minimum 


L 




7. 2 3 7. . .£7 5 


L R 


Residue 


i 







L 


Circle 


o 






None 


Out of 


1 


1 




L 


Or 


V 







L R 


And 


A 


1 




L R 


Nor 


V- 






None 


Nand 


A 






None 


Equal 


= 


1 


Apply 


L R 


Not equal 


* 





for 


L R 


Greater 


> 





k logical 


R 


Not less 


> 


1 


arguments 


R 


Less 


< 





only 


L 


Not greater 


< 


1 




L 



Table 3.5: IDENTITY ELEMENTS OF 
PRIMITIVE SCALAR 
DYADIC FUNCTIONS 



For a matrix M, reduction can proceed along the first 
coordinate (denoted by f/LUM) or along the second 
coordinate (f/[2]A0. The result in either case is a vector; 
in general, reduction applied to any non- scalar array A 
produces a result of rank one less than the rank of A (hence 
the term reduction) . The numbering of coordinates follows 
the index origin, and an attempt to reduce along a 
non-existent coordinate will result in an index error. 
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Since t/[l]M scans over the row index of M it sums each 
column vector of M, and +/[2]M sums the row vectors of M. For 
example, if M is the matrix 



then +/Cl]M is 5 7 9 and +/[2]M is 6 15. 

In reducing along the last coordinate of an array, the 
coordinate indicator may be elided « thus +/M denotes summing 
over each of the rows of M and t/7 denotes summing over the last 
(and only) coordinate of the vector V. 

Reduction over the first coordinate of M by a function f may 
be obtained by using the expression f/M. The symbol / is formed 
by overstriking the solidus with the minus sign. 

iDO^r B£oduct . The familiar matrix product is denoted by C+A+.*B. 
If A and B are matrices, then C is a matrix such that ClI',Jl is 
equal to +/AH; ]xB[ ;«/] . A similar definition applies to Af.qB 
where f and g are any of the standard scalar dyadic functions. 

If A is a vector and B is a matrix, then C is a vector such 
that C[J] is equal to +/AxBt;Jl. If B is a vector and A is a 
matrix, then C is a vector such that c?[l] is equal to +/A\_I; ]x£. 
If both A and B are vectors, then A+.*B is the scalar +/AxB. 

The last dimension of the pre-multiplier A must equal the 
first dimension of the post-multiplier B, except that if either 
argument is a scalar, it is extended in the usual way. For non- 
scalar arguments, the dimension of the result is equal to ("l+p/l), 
UpB. (See the function drop in the section on Mixed Functions.) 
In other words, the dimension of the result is equal to (pA),pB 
except for the two inner dimensions ClipA and 1+pB), which must 
agree and which are eliminated by the reduction over them. 

A and B are conformable with respect to the inner product 
Af.qB if (1) A_ox B is a scalar, or (2) UpA and ltpB are equal, 
or (3) either 1+ P 4 or 1+pB equals one. In the last case the 
corresponding argument is extended by replication to make the 
arguments of equal length along this coordinate. 



BIG 
BAD 
TOP 
JOB 



.e 1 


Example 2 


Example 3 




A 




A 




A 






BIG 




1 


2 






BAD 




3 


4 






TOP 






B 




pA 


JOG 


PA 


5 


6 7 8 
A+ . xB 






4 3 




15 


18 21 


24 






B 


35 


42 49 


56 


Av . = ' 0' 


BAD 










1 1 


3 

1 


pB 

A/\. =B 
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Definitions for various cases are shown in Table 3.6. 

Outer product. The outer product of two arrays X and Y with re- 
spict to a standard scalar dyadic function g is denoted by X°.gY 
and yields an array of dimension ( P X),pY, formed by applying g 
to every pair of components of X and Y. 









Conformability 


Definition 


PA 


PB 


pAf.qB 


requirements 


Z+A£ .gB 










Z*-£/AgB 




V 






Z+f/AgB 


U 








Z-^f/AgB 


U 


V 




U=V 


Z+£/AgB 




V w 


W 




ZlIl*-f/AqBl;I) 


T U 




T 




Z[I>f/4[I;]gB 


U 


V w 


W 


u=v 


ZLI^f/AqBL;.Il 


T U 


V 


T 


u=v 


ZlIl*-f/ALI;}qB 


T U 


V w 


T W 


u=v 


ZLIiJl+f/A\iI;]qBliJl 



Table 3.6: INNER PRODUCTS FOR PRIMITIVE SCALAR 
DYADIC FUNCTIONS f AND g 

If x and Y are vectors and Z+-X°.gY, then Z[I;J] is equal to 
XlIlqYlJl. For example: 







X+i3 

Y«-i4 
Xo .xj 






1 

2 

3 


2 3 
4 6 
6 9 
X" .>Y 


4 

8 

12 


1 
1 
1 



1 
1 






1 





If X is a vector and J is a matrix, and Z-*-X°.gY, then 
ZLI;J;n is equal to XlHgYlJ ;Kl . Definitions for various cases 
are shown in Table 3.7. 









Definition 


pA 


pB 


pA° .qB 


Z+A ° . qB 








Z+kqB 




V 


V 


Zill+AqBlIl 


u 




u 


ZHl+AHlgB 


u 


V 


U V 


ZlIiJl+AlIlqBUl 




V w 


V w 


ZlIiJl+AgBHiJl 


T U 




T U 


ZHi Jl+ALIiJlqB 


u 


V w 


U V w 


zii -,j iia+AiiigBU -,n 


T U 


V 


T U V 


ZLI ; J -.KIGALI iJlgBZn 


T U 


V w 


T U V W 


ZLI ;J iKiLl+AlILJlgBlK-.Ll 



Table 3.7: OUTER PRODUCTS FOR PRIMITIVE 
SCALAR DYADIC FUNCTION g 
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MIXED FUNCTIONS 

Introduction. The scalar functions listed in Table 3.2 each 
take a scalar argument (or arguments) and yield a scalar 
result; each is also extended element by element to arrays. 
The mixed functions of Table 3.8, on the other hand, may be 
defined on vector arguments to yield a scalar result or a 
vector result, or may be defined on scalar arguments to 
yield a vector result. In extending these definitions to 
arrays of higher rank, it may therefore be necessary to 
specify which coordinate of an array the mixed function is 
applied to. The expression [J] following a function symbol 
indicates that the function is applied to the Jth 
coordinate. if the expression is elided, the function 
applies to the last coordinate of the argument array. These 
conventions agree with those used earlier in reduction. 

The numbering of coordinates follows the index origin. 

Transpose. The expression 2 1W yields the transpose of the 
matrix M; that is, if r+2 i$m , then each element RLl-jl is 
equal to MU;I1. For example: 

M 2 liS?A7 

1 2 3 H 15 9 

5 6 7 8 2 6 10 

9 10 11 12 3 7 11 

4 8 12 

If/ is any permutation of order ppA, then P$A is an 

thl ay rli ar J° A exce P fc that the coordinates are permuted: 
the Jth coordinate becomes the P[j]th coordinate of the 

example: ' lf ** PW ' ^ (pR)[Pl ±S equal to * A - For 

4-*- 2 3 5 7pt210 

QA 
2 3 5 7 

P+-2 3 U 1 

pP§A 
7 2 3 5 
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Name 



Size 
Reshape 
Ravel 
Catenate 



Index 3 4 



Sign 



PA 
VpA 
.A 
V.V 



VIA1 
MiA;Al 
ALA;. . 



Index 
generator 3 

Index of 3 



Take 



Drop 



Grade up 5 
Grade down 5 



Compress 5 



Expand* 



Definition or example 2 



pP +■■*■ 4 



p £' 



Reshape A to dimension v 
12 pE ■*--»■ i 12 0p£ +-»■ i 

,A *■-*■ (*/pA)pA ,E +~*\ 12 



B 



P , i 2 +-->■ 235712 



3 4 p 5 «-■+ i 

3 4p i 12 < 

p , 5 «--»- 1 

-> 'THIS' 



'T'^'HIS' 



PC2] 



PC 4 3 2 1] ■»--»• 7 5 3 2 



ff[l 3;3 2 1] ■*--»■ 3 2 1 

11 10 9 



£■[ 1 ; ] <-->- 1 2 3 4 
£[ ;1] «-■* 1 5 9 



• ABCDEFGHIJKL'ZE] 



ABCD 
EFGH 
IJKL 



\S | First S integers 

7i/4 Least index of A 

in 7, or l + pl/ 



1 4 ■*--»• 1 2 3 4 

x o •*--»■ an empty vector 



7t4 
7-M 



I V 
t 7 



Reverse 5 
Rotate 5 



7/M 



7\i4 



Pi 3 +-*2 
4 4i4 ■*-■*■ 1 



5 12 5 

P\ E «--► 3 5 4 5 
5 5 5 5 



1 Take (drop) |7[I] first 
[■elements on coordinate 
J I. (Last if 7[I]<0) 



2 3+X «--► 4BC 

EFG 

'2+P *--»• 57 



>> The permutation which 
Iwould order v (ascend- 
J ing or descending) 



43 532 «--*■ 4132 
?3 5 3 2 ■*--»■ 2 1 3 4 



10 1 0/P «--»■ 2 5 



10 1 0/E 



T 3 
5 7 
9 11 



A$A 



Transpose 



Membership 



Decode 
Encode 



Deal 



V$A 



§A 



1 1/lllE < 

1 1 \ i 2 +■+ 1 2 



1 1/ff 



12 3 4- 
9 10 11 12 

A BCD 
1 1 1 1\X <-■*■ E FGH 

I JKL 



DCBA 

4>X «-■*■ #GP£ 

LKJI 



<t>mx ■ 

(|>P <--»■ 7 5 3 2 



3<j>P ■*•-»- 7 2 3 5 <~* 1<|>P 



©J ■<--> ffFGtf 
^B<7£> 

BCZM 

1 l<t>Z «--»■ EFGH 

LIJK 



Coordinate J of ^ 
becomes coordinate 
7[J] of result 



2 1§X 
1 ItsiE '+•-»■ 16 11 
Transpose last two coordinates $£ •*-->• 2 l$£ 



A EI 
BFJ 
CGK 
DHL 



AeA 



VlV 



S?S 



pWeY ■*--*■ pW 

Pe i4 «--> 1 1 00 



110 
£eP «-•+ 1 1 





101 1 7 7 6 *■-»■ 1776 

24 60 60T3723 ■*-■*■ 1 2 3 



24 60 6011 2 3 «--► 3723 
60 60T3723 •*■-*■ 2 3 



W?Y 



Random deal of W elements from i^ 



Table 3.8: PRIMITIVE MIXED FUNCTIONS (see adjacent notes) 
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Name 



Matrix 
inverse 



Matrix 
division 



Sign' 



SM 



BSA 



Definition or example^ 



-22p63 88 27 44 



63 88 
27 44 

m 

_0. 1111111111 
0. 06818181818 



0. 2222222222 
0.1590909091 



B<-5 7 
A*-2 2p 34 



4 8 



'11.5 99 



Table 3.8; PRIMITIVE MIXED FUNCTIONS (see adjacen t notes) (Cont) 

1 . " "~~ 



3. 
4. 
5. 



Restrictions on argument ranks are indicated by: S fox scalar, 
V for vector, M for matrix, A for Any. Except as the first 
argument of S\A or SLA], a scalar may be used instead of a 
vector. A one -element array may replace any scalar. 

Arrays used 12 3 4 ABCD 

in examples: P ■*■-*■ 2 3 5 7 E ■*■-*■ 5 6 7 8 X ■*-■* EFGH 

9 10 11 12 IJKL 

Function depends on index origin. 

Elision of any index selects all along that coordinate. 

The function is applied along the last coordinate; the symbols 
/, \, and e are equivalent to /, \, and c(> , respectively, ex- 
cept that the function is applied along the first coordinate. 
If [S] appears after any of the symbols, the relevant 
coordinate is determined by the scalar S. 



Notes to Table 3.8 



More generally, Q§A is a valid expression if Q is any vector 
of dimension ppA whose elements are chosen from (and exhaust) the 
elements of \[/Q. For example, if ppA is equal to 3, then 112 
and 2 11 and 111 are suitable values for Q but 1 3 1 is not. 
Just as for the case P§A where P is a permutation vector, the 
Jth coordinate becomes the Qll]th coordinate of Q$A. However, in 
this case two or more of the coordinates of A may map into a 
single coordinate of the result, thus producing a diagonal section 
of A as illustrated below: 







A+-3 3pi9 






A 


1 


2 


3 


4 


5 


6 


7 


8 


9 

1 1W 


1 


5 


9 
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Table 3.9 shows the detailed definitions of 
transposition for a variety of cases. 

Monadic transpose. The expression <s>A yields the array A 
with the last two coordinates interchanged. For a vector V, 
matrix M, and three dimensional array T, the following 
relations hold: 

is?]/ is equivalent to 1§V (and hence to V) 

§M is equivalent to 2 lis?M (ordinary matrix transpose) 

§T is equivalent to 1 3 2&?T 

Rotate. If K is a scalar or one-element vector and Ms a 
vector, then K$X is a cyclic rotation of X defined as 
follows: K$X is equal to X[l+(pX)| 1+X+ipI], For example, 
if X+-2 3 5 7 11, then 2§X is equal to 5 7 11 2 3, and 2<&X 
is equal to 7 11 2 3 5. In 0-origin indexing, the 
definition for KfyX becomes XI ( pX ) \K+i pXl . 

If the rank of X exceeds 1, then the coordinate J along 
which rotation is to be performed may be specified in the 
form Z-*-K<blJ]X. Moreover, the dimension of K must equal the 
remaining dimensions of X, and each vector along the J'th 
coordinate of X is rotated as specified by the corresponding 
element of if. A scalar K is extended in the usual manner. 



Case 



R*-l§ 

i?f-l 

R+-2 

i?«-l 

f?«-l 

f?«-l 

R-r-2 

R<-3 

R+-1 

R<-1 

R+-2 

R+-1 



V 

2§M 

1§M 

1W 

2 3§T 
2<S)T 
1§T 
2is?2' 
2§T 
1ST 
DsiT 
1§T 



PR 



pM 
(pW) 

L/pW 
pT 

(p?) 

(pD 
(pD 
(L/C 
(L/C 
(L/( 
L/pT 



[2 l] 



[13 2] 

[312] 

[2 3 1] 

pT)[l 2]),(pT)[3] 

pT)[l 3]),(p2 1 )[2] 

pT)[2 3] ) ,(pT)[l] 



Definition 



RL I;J]<-MLJ 

/?[I]«-Af[I 

R+T 

RHlJlKl + TLI 

RLllJiKl+TM 

Rll ;J;K]+TIK 

RHlJl+TLl 

RII;J1+TII 

RlI;Jl<-TU 



ill 
ill 

;K;J^ 
;K;I1 
iliJl 
iliJl 
iJiH 
iliU 
iliU 



Table 3.9: TRANSPOSITION 
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For example, if p x is 3 4 and J is 2, then K must be of 
dimension 3 and Z[i ; ] is equal to KllWlI*, ] . if j i s 1 
then p # must be 4, and z[ ; I] is equal to K [ J ] <M" ; I ] . If X is 
a three-dimensional array, then K must be a matrix or a 
scalar. For example: 

M 012 3<J)[i]^ 1 2 3«(>[2jAf 

1234 16 11 4 2341 

5 6 7 8 5 10 38 7856 

9 10 11 12 9 2 7 12 12 9 10 11 

The expression K&X denotes rotation along the first 
coordinate of X. The symbol e is formed by overstrikinq a o 
with a minus sign. 

Reverse. If x is a vector and R+fyX, then R is equal to X 
except that the elements appear in reverse order. Formally 
R is equal to *[ It (p* )-i P *]. m 0-origin indexing, the 
appropriate expression is XI l + (pAT)-xpZ]. 

If A is any array, </ is a scalar or one-element vector, 
and R+$IJ-]A, then R is an array like A except that the order 
of the elements is reversed along the Jth coordinate. For 
example: 

A <j>[l]4 <bi23A 



12 3 4 5 6 

4 5 6 12 3 



3 2 1 
6 5 4 



The expression <M denotes reversal along the last 

coordinate of A, and &A denotes reversal along the first 

coordinate. For example, if A is of rank 3, then <M is 
equivalent to <t>[3]4, and e/1 is equivalent to <j>[l]/4. 

Compress. The expression u/X denotes compression of x by u 
If jj is a logical vector (comprising elements "having only 

thJn V ^v SS ° ^ 1 ] and X is a vector of the same dimension, 
then u/X produces a vector result of + /u elements choseA 
from those elements of x corresponding to non-zero elements 
of U. For example, if x*-2 3 5 7 11 and u+1 01 1 then 
U/X is 2 5 7 and {~U)/x is 3 11. 

To be conformable, the dimensions of the arguments must 
agree, except that a scalar (or one-element vector) left 
argument is extended to apply to all elements of the riaht 
argument. Hence i/x is equal to X and o/X is an empty 
vector. A scalar right argument is not extended. The 
result in every case is a vector. 
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If M is a matrix, then U/LllM denotes compression 
along tne first coordinate, that is, the compression 
operates on each column vector and therefore deletes certain 
rows. It is called column compression. Similarly, U/L21M 
(or simply U/M) denotes row compression. The result in 
every case is a matrix. As in reduction, U/M denotes 
compression along the last coordinate, and U/M denotes 
compression along the first. 

Expand. Expansion is the converse of compression and is 
denoted by U\X. If Y+U\X, then U/Y is equal to X and (if X 
is an array of numbers) (~U)/Y is an array of zeros. In 
other words, U\X expands X to the format indicated by the 
ones in U and fills in zeros elsewhere. To be conformable, 
+/U must equal pX. 

If X is an array of characters, then spaces are 
supplied rather than zeros, i.e., if Y+U\X then (~£/)/Y is an 
array of the space character ' * . Again, U\1j]m denotes 
expansion along the e7th coordinate, U\M denotes expansion 
along the last, and U\M denotes expansion along the first. 
See Table 3.8 for examples of expansion. 

A scalar left argument is not extended. 

Decode. The expression RiX denotes the value of the vector 
X evaluated in a number system with radices 
fl[l],fl[2] ,. .. ,/?[pi?]. For example, if R+2h 60 60 and 
X+l 2 3 is a vector of elapsed time in hours, minutes, and 
seconds, then RiX has the value 372 3, and is the 
corresponding elapsed time in seconds. Similarly, 
10101010x1776 is equal to 1776, and 222±101is 
equal to 5. Formally, R±X is equal to +/W*X, where W is the 
weighting vector determined as follows: W[pW] is equal to 
1, and Wll-ll is equal to RUlxWLH. For example, if R is 
24 60 60, then W is 3600 60 1. 

The result is a scalar. 

The arguments R and X must be of the same dimension, 
except that either may be a scalar (or one-element vector) . 
For example, 10 i 1 7 7 6 is equal to 1776. The arguments 
are not restricted to integer values. If X is a scalar, 
then XiC is the value of a polynomial in X with coefficients 
C, arranged in order of descending powers of X. 

The decode function is commonly applied in work with 
fixed-base number systems and is often called the base 
value function. 
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Encode. The encode function RrN denotes the representation of the 

scalar N in the base-i? number system. Thus, if Z+RtN, then 

(x/i?)| N-RiZ is equal to zero. For example, 2222t5js0101 

nv ? 2 I T J is 1 ° 1 and 2 2 T 5 is ° 1 - Th e dimension of 
htN is the dimension of R. The encode function is also called 
£§P£S?®?}tation. 

Encode and Decode with Array Arguments. Encode and decode have 
been extended to operate on arrays. If z+RtN, then P Z equals 
(pi?),ptf. If X+AiB. then pX equals ( "l \pA ) , 1 4-pS . 

^ ai ??^ 5 , are conformab le with respect to the decode function AiB 
it (i) 4 or_5 is a scalar, or (2)"itp^l and ltpB are equal, or 
(3) either 1+ P A or 1+ P B equals one. In the last case the corres- 
ponding argument is extended by replication to make the arguments 
of equal length along this coordinate. 

Example 

A 
10 10 10 

B 
132 755 
4 5 9 5 3 3 

AiB 

1 7 

4 5 

3 5 

5 3 

2 5 
9 3 

Index of. If v is a vector and S is a scalar, then J*-ViS yields 
the position of the earliest occurrence of s in V. If s does not 
equal any element of V, then J has the value (il)+ P K. Clearly 
this value depends, as does any result of this function, on the 
index origin, and is one greater than the largest permissible 
index of V. 

If 5 is a vector, then J is a vector such that «/[J] is the 
index in V of Sill. For example: 

'ABCDEFGH' i 'GAFFE' 
7 16 6 5 

If X is a numerical vector, then the expression Xi[/X 
yields the index of the (first) maximum element in X. For 
example, if X is the vector 8 3 5 13 2 7 9, then r IX is 13 and 
X\\ IX is 4. 

The result in every case has the same dimensions as the 
righthand argument of x. For example, if Z+ViS, and S is a 
matrix, then ZC7;<7] is equal to V\SU;Jl. 
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Membership. The function Xel yields a logical array of the same 
dimension as X. Any particular element of XeY has the value 1 if 
the corresponding element of X belongs to I, that is, if it occurs 
as some element of Y. For example, (\7)e3 5 is equal to 

10 10 and ' ABCDEFGE* e' COFFEE y equals 00101100. 

If the vector U represents the universal set in some finite 
universe of discourse, then UeA is the characteristic of the set 
A, and the membership function is therefore also called the 
9h§£§?teristic function. 

The size of the result of the function e is determined by 
the size of the left argument, whereas the size of the result of 
the dyadic function i is determined by the size of the right 
argument. However, the left arguments of both frequently play the 
role of specifying the universe of discourse. 

?'§]?§ §04 ^2B* If 7 is a vector and S is a scalar between and 
p7, then S+7 takes the first S components of 7. For example, if 
7+i7, then 3 + 7 is 1 2 3 and + 7 is iO. 

If S is chosen from the set ~ip7, then 5+7 takes the last 

1 S elements of 7. For example, 3+7 is 5 6 7. 

If A is an array, then W\A is valid only if W has one element 
for each dimension of A, and {/[!] determines what is to be taken 
along the Ith coordinate of A. For example, if A ■*- 3 4pil2, then 

2 ~3+i4 is the matrix 

2 3 4 
6 7 8 

The function drop ( +) is defined analogously, except that 
the indicated number of elements are dropped rather than taken. 
For example, ~1 1 M is the same matrix as the one displayed in 
the preceding paragraph. 

The rank of the result of the take and drop functions is 
the same as the rank of the right argument. The take and drop 
functions are similar to the transpose in that the left argument 
concerns the dimension vector of the right argument. 

The right argument for + and 4- is expanded if necessary. For 
example, 4+i2 is equal to 1 2 and M-+MBC" is MBC" . 

G^ a de HE 50:1 1°.™!!* The function k V produces the permutation 
which would order 7, that is VtiV'} is in ascending order. For 
example, if 7 is the vector 7 1 16 5 3 9, then kV is the vector 
2 5 4 16 3, since 2 is the index of the first in rank, 5 is the 
index of the second in rank, and so on. The symbol k is formed 
by overstriking I and A. 

If P is a permutation vector, then iP is the permutation 
inverse to P. If a vector D contains duplicate elements, then 
the ranking among any set of equal elements is determined by their 
positions in D. For example, ^537392 is the vector 6 2 4 13 5, 
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The grade down function t is the same as the function i ex- 
cept that the grading is determined in descending order. Because 
of the treatment of duplicate items, the expression a/(4,v)=:c> t F 
has the value 1 if and only if the elements of the vector V are 
all distinct. 

Deal. The function M?N produces a vector of dimension M obtained 
by making M random selections, without replacement, from the 
population \N. In particular, N?N yields a random permutation of 
order N. Both arguments are limited to scalar s or one-element 
arrays . 

Matrix Division and Inversion. Matrix division can be used for 
inverting matrices, solving sets of linear equations, and finding 
least squares solutions. The syntax for the dyadic function is 
X<-B\BA where i is formed by typing □, backspace, *. A must have 
rank 2. The rank of B must be 1 or 2. Also, 1+pA must be greater 
than or equal to 1 +p4 and l + p4 must equal 1 + pB. If X+BEA , then 
X minimizes +/+/ ( (A+ . xX)-B)*2. 

The monadic function X+@A is tantamount to X+I&A where I is an 
identity matrix of order l + p.4. Thus, monadic EE yields the inverse 
of a square matrix (or a DOMAIN ERROR if the matrix is not in- 
vertible) . 

Example 1: Matrix I^Y^fLi?". 

A 
63 88 
27 44 

m 

0.1111111111 "0.2222222222 
"0.06818181818 0.1590909091 

Example 2: Solving Sets of Linear Equations^ 

If x + 2y = 8 

3x - y = 3 

Then in APL: 

A+-2 2pl 2 3 "1 

B-<-8 3 

BEA 
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Example 3: Least Squares Solution 

A 

3 . 683 2.448 

0.11 6.14 

7.206 0.18 

2.589 2.257 

3 .164 8 .393 
B 

27 . 9 43 23 23 . 9 68.4 

BM 
3.020193561 6.988397527 

Comments. The lamp symbol pi, formed by overstriking n and °, 
signifies that what follows it is a comment, for illumination 
only and not to be executed; it may occur only as the first 
character in a statement, but may be used in defined functions. 

MULTIPLE SPECIFICATION 

Specification (-*-) may (like any other function) occur 
repeatedly in a single statement. For example, the execution of 
the statement Z+XxA+3 will assign to A the value 3, then multiply 
this assigned value of A by X and assign the resulting value to Z. 

Multiple specification is useful for initializing variables. 
For example: 

X+Y+l+Z+Q 

sets X and I to 1 and Z to o . 

A branch may occur in a statement together with one or more 
specifications, provided that the branch is the last operation to 
be executed (i.e., the leftmost). For example, the statement 
-*S*\N>I+I+1 first augments I, and then branches to statement S 
if N exceeds the new value of I. 

In the expression Z«-U+B)x(C+D) it is immaterial whether the 
left or the right argument of the * is evaluated first, and hence 
no order is specified. The principle of no specified order in 
such cases is also applied when the expressions include specifica- 
tion. Since the order here is sometimes material, there is no 
guarantee which of two or more possible results will be produced. 

Suppose, for example, that A is assigned the value 5 and the 
expression Z+(.A+-3)xA is then executed. If the left argument of 
x is executed first, then A is assigned the value 3, the right 
argument then has the new value 3 and Z is finally assigned the 
value 9. If, on the other hand, the right argument is evaluated 
first it has the value 5 initially assigned to A, the value 3 is 
then assigned to A and multiplied by the 5 to yield a value of 
15 to be assigned to Z. 
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SYSTEM DEPENDENT FUNCTIONS 

There are three main types of information about the 
state of the system which are of value to the user: 

1. general information common to all users, such as 
date, time of day, and the current number of terminals 
connected to the system. 

2. information specific to the particular work 
session, such as the time of sign-on, the central 
computer time used, and the total keying time. 

3. information specific to the active workspace, such 
as the amount of storage available, and the condition 
of the state indicator. 

This information is provided by a single family of 
functions denoted by i (formed by overstriking t, and i), 
and called the J-B^am functions. The individual member 
function is selected by the argument as shown in Table 3.10. 
Times are all in units of one-sixtieth of a second, the date 
is given as a six-digit integer in which the successive 
digit pairs specify the month, day, and year, and the 
available storage is given in ky±e_s. 

The byte is a unit of storage egual to 8 binary digits. 
A variable requires for storage a small number of bytes of 
overhead, plus a certain number of bytes per element 
depending upon the form of its representation: 1 if the 
elements are characters, 0.125 if the elements are logical, 
4 if the elements are integers less than 2*31 in magnitude, 
and 8 for other numbers. 

In designing an algorithm for a particular purpose, it 
frequently happens that one may trade time for space; that 
is, an algorithm which requires little computer time may 
require more storage space for intermediate results, and an 
algorithm which requires little storage may be less 
efficient in terms of time. Hence, the information provided 
by the functions 121 (computer time used) and 122 (available 
storage space) may be helpful in designing algorithms. For 
example, the function TIME of Appendix B can be used to 
determine the computer time used in the execution of a 
function. 

Moreover, since the functions i2l and i22 can, like all 
of the I-beam functions, be used within a defined function, 
they can be used to make the execution dependent upon the 
space available or the computer time used. 
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X 



19 

20 
21 
22 
23 
24 
25 
26 
27 
28 
29 



Definition of iff 



Accumulated keying time (time during which the keyboard 

has been unlocked awaiting entries) during this session. 

The time of day. 

The central computer time used in this session. 

The amount of available space (in bytes) . 

The number of terminals currently connected. 

The time at the beginning of this session. 

The date. 

The first element of the vector 12 7. 

The vector of statement numbers in the state indicator. 

A code indicating the terminal device being used. 

User sign-on number. 



NOTES 

1. All times in 1t60 seconds 

2. Date is represented by a 6-digit integer; successive 
digit pairs represent month, day, and year. 

3. i2 7 yields a vector; all other results are scalars. 



Table 3.10: SYSTEM DEPENDENT FUNCTIONS 



Keying time is defined as the total accumulated time 
since sign-on during which" the keyboard has been unlocked 
awaiting entry. The associated function (H9) may be used 
in conjunction with D or CI input to determine the amount of 
time taken by a student in responding to a question. The 
following example shows the definition and use of a 
multiplication drill which tells the student how long he has 
taken (in whole minutes and seconds) to answer each 
question: 





VMULTDRILL N ; X ;Y ;TIME 


Cl] 


n*-y+?N 


C2] 


TIME+T 1 9 


[3] 


X+Q 


[4] 


TIME+-(zl9)-TIME 


[5] 


+ 8xil«/y 


C6] 


X TIME: ' ;2 + 60 60 &0TTIME 


C7] 


■>1 


[8] 


' WRONG , TRY AGAIN' 


C9] 


->3V 




MULTDRILL 12 12 


6 3 




D: 






18 


TIME: 


3 


4 5 






30 


WRONG 


, TRY AGAIN 


D: 
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Such a drill could be expanded to accumulate statistics of 
the student's response times or to use some function of the 
response times to control the difficulty of the questions 
posed. ^ 

Since times are expressed in units of If 60 seconds, the 
time m hours, minutes, and seconds can be determined by an 
expression of the form 3+24 60 60 60ti21. Similarly a 
3-element vector representing the date can be obtained from 
the expression (3 p 100)ti25. 

The expression 12 7 provides the vector of statement 
numbers m the state indicator, with the first position 
occupied by the number of the statement on which the 
innermost function is suspended. If no functions are 
suspended, the vector 12 7 is empty. 

The expression 12 6 yields a scalar which is the first 
element of 12 7. it is therefore equal to the number of the 
statement being, or about to be, executed and is 
particularly useful in branches. For example, -WM-I2 6 causes 
a forward jump of it statements. Moreover, entering ->i2 6 is 
a safe way to resume execution without having to read and 
enter the statement number printed at the point of the last 
suspension. it is even more convenient to resume by 
entering +C , after first defining the function C as follows! 

El] Z«-(l27)[2]V 
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PART 4 

LIBRARY FUNCTIONS 

A user may load or copy functions from any workspace 
for which he knows the library number and workspace name 

(and password, if any). Moreover a listing of the 
workspaces in Library N can be obtained by the command 

)LIB N for any public library, i.e., for any library whose 
number is below 1000. 

A public library may be used for the casual sharing of 
functions among a group of co-workers. When intended for 
more general use, a library function should be thoroughly 
tested and well-documented j and should incorporate messages 
for the guidance of the us^r. It is therefore good practice 
to restrict certain of the public libraries to such 
functions as are of general interest and have passed 
appropriate acceptance tests. 

In the APL\360 system as distributed, Library 1 is 
restricted in this manner. This section treats each of the 
workspaces in this library by loading each and displaying 
the descriptions contained in the workspaces themselves. 
Further information on the functions in each workspace can 
(except in the case of the locked functions in WSFNS) be 
obtained by displaying the function definitions. 



)L0AD 1 ADVANCEDEX 



SAVED 


07/14/68 

)FNS 


16.53. 


19 










AH 


ASSOC 


BIN 


COMB 


DTH 


ENTER 


F 


FC 


GC 


GCD 


GCV 


HILB 


HTD 


IN 


INV 


INVP 


INI 


LFC 


LOOKUP 


PALL 


PER 


PERM 


PO 


POL 


POLY 


POLYB 
DESCRIBE 


RESET 


TIME 


TRUTH 


" ZERO 







EACH OF THE VARIABLES OF THIS WORKSPACE WHICH BEGINS WITH THE 
LETTER V IS THE DESCRIPTION OF THE FUNCTION WHOSE NAME IS 
OBTAINED BY REMOVING THE D. FOR FURTHER DETAILS SEE APPENDIX 
B OF THE 4PZA360 MANUAL, 
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)LOAD 1 PLOTFORMAT 
SAVED 07/20/68 31.07.27 

)FNS 
AND DESCRIBE DFT 

DESCRIBE 



EFT 



PLOT 



VS 



THE WORKING FUNCTIONS IN THIS WORKSPACE ARE: 

AND DFT EFT PLOT VS 
THE NAMES AND COMPOSITION OF THE GROUPS IN THIS WORKSPACE ARE: 



DFTGP: 
EFTGP: 
PLOTGP: 
DESGP: 



AND DFT 

AND EFT 

AND PLOT VS 

DESCRIBE HOWFORMAT 



HOWPLOT 



DESGP CAN BE USED TO CONVENIENTLY ERASE THE DESCRIPTIVE MATTER 
TO MAKE MORE ROOM IN THE WORKSPACE. THE OTHER GROUPS CAN BE USED 
TO SELECTIVELY COPY THE INDICATED FUNCTIONS. 



SYNTAX 
Z+A AND B 



Z*-A DFT B 
Z-rA EFT B 
A PLOT B 

Z+A VS B 



DESCRIPTION 

ESSENTIALLY A COLUMN-CATENATOR , WITH SOME EXTRA 
EFFECTS WHEN THE ARGUMENTS ARE NOT MATRICES 
THIS FUNCTION IS DESIGNED TO BE USED EITHER 
INDEPENDENTLY, OR IN CONJUNCTION WITH VS. 
TOGETHER, THEY PROVIDE A CONVENIENT WAY OF FORM- 
ING INPUT TO THE PLOT FUNCTION. 

FORMS FIXED-POINT OUTPUT. MORE DETAILED DIREC- 
TIONS CAN BE FOUND IN THE VARIABLE HOWFORMAT. 

FORMS EXPONENTIAL OUTPUT. MORE DETAILED DIREC- 
TIONS CAN BE FOUND IN THE VARIABLE HOWFORMAT. 

GRAPHS ONE OR MORE FUNCTIONS SIMULTANEOUSLY 
DIRECTIONS FOR USING PLOT CAN BE FOUND IN THE 
VARIABLE HOWPLOT. 

ESSENTIALLY A COLUMN-CATENATOR, SIMILAR TO AND 
EXCEPT THAT THE RIGHT-HAND ARGUMENT MUST BE OF 
RANK < 1. IT IS DESIGNED PRIMARILY TO PROVIDE 
CONVENIENT FORMATION OF INPUT TO PLOT FUNC- 
TION. WHETHER USED BY ITSELF OR WITH AND, VS 
WILL CAUSE ITS RIGHT ARGUMENT TO APPEAR AS THE 
LEFTMOST COLUMN OF THE RESULTANT ARRAY. (THE 
RESULTANT WILL BE AN ARRAY OF RANK THREE, CON- 
SISTING OF A SINGLE PLANE). 



BOTH AND AND VS WILL WORK WITH EITHER 1 OR O-ORIGIN INDEXING 
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HOWFORMAT 

THE FUNCTIONS DFT AND EFT WILL FORMAT NUMBERS IN DECIMAL AND EX- 
PONENTIAL FORM, RESPECTIVELY, FOR TABULAR OUTPUT. THEY MAY BE 
USED TO GENERATE IMMEDIATE OUTPUT, OR TO STORE AN IMAGE FOR LATER 
PRINTING. THE TWO FORMS ARE: 

PATTERN DFT TABLE 
PATTERN EFT TABLE 

AND 

IMAGES-PATTERN DFT TABLE 
IMAGE-rPATTERN EFT TABLE 

THESE FUNCTIONS WORK PROPERLY ONLY WITH 1- ORIGIN INDEXING. 

RIGHT ARGUMENT: AN ARRAY TO BE FORMATTED. 

IT MUST BE NUMERICAL, AND OF RANK < 3. THE FIRST PLANE 
OF A 3-DIMENSIONAL ARRAY WILL BE TREATED AS A MATRIX, AND 
ALL OTHER PLANES WILL BE DISREGARDED. ARRAYS OF HIGHER 
RANK WILL BE SIGNALLED AS A 'RANK PROBLEM.' 

LEFT ARGUMENT: ONE OR MORE INTEGERS TO CONTROL THE FORMAT. 

FRACTIONAL NUMBERS WILL BE SIGNALLED AS A 'DOMAIN PROBLEM.' 

A SINGLE INTEGER: 

DFT: SPECIFIES THE NUMBER OF DIGITS TO THE RIGHT OF 

THE DECIMAL POINT IN DECIMAL FORMAT. 
EFT: SPECIFIES THE NUMBER OF SIGNIFICANT DIGITS IN 

EXPONENTIAL FORMAT. ONE DIGIT ALWAYS APPEARS 

TO THE LEFT OF THE DECIMAL POINT. 
COLUMNS WILL BE SPACED UNIFORMLY, WITH SPACING SUCH 
THAT THERE WILL BE TWO SPACES BETWEEN THE CLOSEST 
NUMBERS . 

A PAIR OF INTEGERS: THE FIRST SPECIFIES THE TOTAL NUMBER OF 
SPACES TO BE ALLOCATED TO EACH COLUMN, AND THE SECOND 
IS USED AS ABOVE. 
DFT: THE FIRST NUMBER MUST BE AT LEAST TWO LARGER 

THAN THE SECOND. 
EFT: THE FIRST NUMBER MUST BE AT LEAST SIX LARGER 

THAN THE SECOND. 
IF THE LEFT NUMBER IS TOO SMALL, THIS WILL BE SIGNALLED 
AS A 'DOMAIN PROBLEM.' 

MORE THAN ONE PAIR OF INTEGERS: THERE MUST BE ONE PAIR 

FOR EACH COLUMN OF OUTPUT {OR EACH ELEMENT OF A VECTOR) 
EACH PAIR WILL BE INTERPRETED AS ABOVE, AND WILL APPLY 
TO THE LAYOUT OF THE CORRESPONDING COLUMN. IF THE 
NUMBER OF PAIRS DOES NOT MATCH THE NUMBER OF COLUMNS, 
THIS' WILL BE SIGNALLED AS A 'LENGTH PROBLEM.' 
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HOWPLOT 

THE FUNCTION PLOT WILL GRAPH ONE OR MORE FUNCTIONS SIMULTANEOUSLY. 
AUTOMATICALLY SCALING THE VALUES TO FIT APPROXIMATELY WITHIN SCALE 
DIMENSIONS SPECIFIED BY THE USER. IT WILL WORK ONLY IN 1- ORIGIN 
INDEXING . 

THE FORM IN WHICH PLOT IS USED IS: 

SCALESIZE PLOT FUNCTION 

LEFT ARGUMENT: ONE OR TWO NUMBERS. 

FIRST NUMBER SPECIFIES THE APPROXIMATE SIZE OF THE VERTICAL 
AXIS AND THE SECOND NUMBER DOES THE SAME FOR THE HORIZONTAL 
AXIS. 

IF ONLY ONE NUMBER IS SUPPLIED, IT IS APPLIED TO BOTH AXES. 

THERE IS NO BUILT-IN LIMIT TO THE DIMENSIONS, AND A HORI- 
ZONTAL AXIS LARGER THAN THE WORKSPACE WIDTH WILL CAUSE 
SOME POINTS TO BE PRINTED ON THE NEXT LOWER LINE. 

RIGHT ARGUMENT: A RECTANGULAR ARRAY WITH RANK < 3. 

SCALAR: WILL BE TREATED AS A VECTOR OF LENGTH ONE. 

VECTOR: WILL BE PLOTTED AS ORDINATE AGAINST ITS OWN 
INDICES AS ABSCISSA . 

MATRIX: THE LEFTMOST COLUMN WILL BE TAKEN AS THE ABSCISSA 
AND ALL OTHER COLUMNS WILL BE PLOTTED AS ORDINATES. A 
DIFFERENT PLOTTING SYMBOL UP TO THE NUMBER OF SYMBOLS 
AVAILABLE WILL BE USED FOR EACH COLUMN. IN CASE TWO 
ORDINATES HAVE A COMMON POINT, THE SYMBOL FOR THE 
COLUMN FURTHEST TO THE RIGHT WILL BE USED. 

3-DIMENSIONAL ARRAY: THE FIRST PLANE WILL BE PLOTTED AS A 
MATRIX, AND ALL OTHER PLANES WILL BE DISREGARDED. 

AUXILIARY FUNCT-IONS: THE FUNCTIONS AND AND VS CAN BE USED 
TO GENERATE THE RIGHT ARGUMENT IN THE PROPER FORM FOR 
PLOT. FOR EXAMPLE: 

2 PLOT Z AND Y VS X 

PLOT CHARACTERS: THE SYMBOLS USED ARE ASSIGNED TO THE VARIABLE 
PC IN LINE 1 OF PLOT. THE ALPHABET SUPPLIED IS 'o*°VAD'. 
THIS ALPHABET MAY BE EXTENDED AND MODIFIED AS DESIRED, 
USING THE NORMAL FUNCTION-EDITING PROCEDURES: EITHER CHANGE 
LINE 1 OF THE FUNCTION, OR DELETE IT AND INDEPENDENTLY 
SPECIFY A VALUE FOR PC. 

HISTOGRAMS: PLOT CAN BE USED TO GENERATE HISTOGRAMS BY SETTING 
THE VARIABLE HS TO 1 IN LINE 2 OF THE FUNCTION. ALTERNA- 
TIVELY, LINE 2 CAN BE DELETED, AND HS CAN BE SET EXTERNALLY. 
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)LOAD 1 APLCOUESE 
SAVED 07/19/68 25.58.06 

)FNS 
BIX CHECK DESCRIBE 

EASY EASYDRILL FORM 

INTER LOG QUES RANDOM 



DIM DRILL 


DYAD1 


DYAD 2 


FUNDRILL 


GET 


INPUT 


REDSCAPATCH 


REPP 





SETPARAMETERS 



TEACH TRACE 



DESCRIBE 

THE MAIN FUNCTIONS IN THIS LIBRARY WORKSPACE ARE: 

TEACH 
EASYDRILL 

ALL OTHER FUNCTIONS ARE SUBFUNCTIONS AND ARE NOT 

SELF-CONTAINED. 

SYNTAX DESCRIPTION 

TEACH AN EXERCISE IN APL FUNCTIONS USING SCALARS 

AND VECTORS. THE FUNCTION PRINTS OUT THE 
CHOICES AND OPTIONS AVAILABLE. EXAMPLES 
ARE SELECTED AT RANDOM WITH A RANDOM 
STARTING POINT. 

EASYDRILL THIS IS THE SAME AS TEACH EXCEPT THAT THE 

PROBLEMS SELECTED ARE GENERALLY SIMPLER IN 
STRUCTURE. PROBLEMS INVOLVING VECTORS OF 
LENGTH ZERO OR ONE ARE EXCLUDED. 

NOTE: FOR EITHER FUNCTION, A RESPONSE OF - PLEASE - WILL DIS- 
CLOSE THE PROPER ANSWER. A RESPONSE OF - STOP - WILL TERMINATE THE 
DRILL. 



TEACH 
ARE YOU ALREADY FAMILIAR WITH' THE INSTRUCTIONS? 
AND N FOR NO. ) 
N 



(TYPE Y FOR YES 



THIS IS AN EXERCISE IN SIMPLE APL EXPRESSIONS. YOU WILL FIRST 
HAVE THE OPPORTUNITY TO SELECT THE FEATURES YOU WISH TO BE DRILLED 
IN. THE EXERCISE THEN BEGINS. FOR EACH PROBLEM YOU MUST ENTER 
THE PROPER RESULT. ANSWERS WILL CONSIST OF SCALAR INTEGERS IF 
EXERCISES WITH VECTORS ARE NOT DESIRED; OTHERWISE ANSWERS WILL 
CONSIST OF SCALARS OR VECTORS. A VECTOR OF LENGTH ZERO REQUIRES 
THE RESPONSE i , A VECTOR OF LENGTH ONE REQUIRES THE RESPONSE X, 
WHERE X IS THE VALUE OF THE ELEMENT. YOU HAVE THREE TRIES FOR 
EACH PROBLEM. TYPE STOP AT ANY TIME TO TERMINATE THE EXERCISE 
AND PRODUCE A RECORDING OF YOUR PERFORMANCE. TYPING STOPS HORT 
WILL TERMINATE THE EXERCISE BUT WILL NOT PRODUCE A RECORD OF 
PERFORMANCE. TYPING PLEASE FOR ANY PROBLEM WILL LET YOU PEEK AT 
THE ANSWERS. TYPE Y UNDER EACH FUNCTION FOR WHICH YOU WANT 
EXERCISE: 



4.5 



SCALAR DYADIC FUNCTIONS 
+ -x**f-|_ <£ = £>* ;| Av«ivv 
YYYYY Y 

SCALAR MONADIC FUNCTIONS 
+ -x*TL!| ~ 
YY 

TYPE Y IF EXERCISES ARE TO USE VECTORS, N OTHERWISE 



18 

□ : 

~2 

TRY AGAIN 
D: 

3 



6x 3 



L 2.5 



D: 



+ 7 



STOP SHORT 



)L0AD 1 WSFNS 
SAVED 16.01.28 11/09/70 

)FNS 
DELAY DIGITS ORIGIN SETFUZZ SETLINK WIDTH 

DESCRIBE 

FOR EXAMPLE, THE FOLLOWING FUNCTION: 

VF X 
Cl] Xi-ORIGIN X 
[2] G 
C3] X+ORIGIN XV 

WILL EXECUTE THE FUNCTION G WITH WHATEVER TNTIWY nnrrr^ to 
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THE FOLLOWING FUNCTIONS ARE ALSO AVAILABLE: 



SYNTAX 



DESCRIPTION 



Z+SETLINK X 



SETS TEE VALUE OF TEE LINK IN TEE CHAIN OF NUMBERS 
GENERATED IN THE USE OF THE ROLL AND DEAL FUNCTIONS, 
THE EXPLICIT RESULT PRODUCED BY SETLINK IS THE 
PREVIOUS VALUE OF THE LINK. 



THE RESULTS PRODUCED BY THE ROLL AND DEAL FUNCTIONS 
ARE NOT THE LINKS THEMSELVES, BUT RATHER SOME 
FUNCTION OF THEM. THE LENGTH OF THE CHAIN {BEFORE 
REPETITION) IS 2*31. 



DELAY X 



DELAYS EXECUTION FOR X SECONDS. 



Z+SETFUZZ X 



WHERE 0<*<31, SETS THE VALUE OF FUZZ. THE EXPLICIT 
RESULT PRODUCED BY SETFUZZ IS THE PREVIOUS VALUE 
OF FUZZ. THE FUZZ VALUE DETERMINES THE NUMBER OF 
LOW ORDER BITS IGNORED IN COMPARISONS. 



)LOAD 1 TYPEDRILL 
SAVED 10.00.03 08/19/70 

) WIDTH 6 5 
WAS 120 

)FNS 
DESCRIBE IN INSTRUCTIONS 
STATISTICS TIME TYPEDRILL 

) WIDTH 120 
WAS 6 5 

DESCRIBE 



MATCH 
WS 



PRT QUERY 



THE MAIN FUNCTION IN THIS WORKSPACE IS: TYPEDRILL. ALL OTHER 
FUNCTIONS IN THIS WORKSPACE ARE USED AS SUBFUNCTIONS . 

SYNTAX DESCRIPTION 

TYPEDRILL A TIMED TYPING EXERCISE. WHEN EXECUTING TYPEDRILL 
THE SYSTEM RESPONDS WITH A STATEMENT - YOU ARE IN 
THE CONTROL STATE. FOUR COMMANDS ARE AT YOUR DIS- 
POSAL: ENTER, DRILL, STAT OR STOP. 

THE COMMAND ENTER WILL BRING YOU INTO THE ENTRY STATE. 
IN THIS STATE YOU TYPE ONE-LINE SENTENCES, CHARAC- 
TERS OR APL EXPRESSIONS YOU WISH TO BE DRILLED ON. 
TYPING ONLY A CARRIAGE RETURN CAUSES A RETURN TO 
THE CONTROL STATE. 

THE COMMAND DRILL PRODUCES RANDOMLY THE LINES 
ENTERED VIA THE ENTER STATE. THE LINES ARE PRODUCED 
ONE LINE AT A TIME AND YOU ARE EXPECTED TO RETYPE 
THE LINE. IF IT IS ERROR-FREE, THE TIME REQUIRED 
TO TYPE THE LINE IS SHOWN. IF NOT, YOU ARE ASKED 
TO RETYPE IT. AGAIN, TYPING ONLY A CARRIAGE RETURN 
CAUSES A RETURN TO THE CONTROL STATE. 
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THE COMMAND STAT DISPLAYS ACCUMULATED STATISTICS 
THE VERTICAL AXIS IS THE TIME/SEC{*) AND THE 
HORIZONTAL AXIS SHOWS THE TRIAL NUMBERS(o) . A 
VERTICAL ARROWS) INDICATES THAT THE TIME EXCEEDS 
THE LIMIT OF THE GRAPH. YOU ARE AUTOMATICALLY 
RETURNED TO THE CONTROL STATE. 

THE COMMAND STOP DISPLAYS THE ACCUMULATED STATISTICS 
AND TERMINATES THE DRILL. 

TYPEDRILL 
CONTROL WORDS ARE: ENTER, DRILL, STAT, AND STOP. 

YOU ARE IN CONTROL STATE 

ENTER 

DESOLATE IS THE ROOF WHERE THE CAT SAT, 

DESOLATE IS THE IRON RAIL THAT HE WALKED 

AND THE CORNER POST WHENCE HE GREETED THE SUNRISE 

IN HILL PATH: 'THKK. THGK' 

OF THE LOOM 
'THGK, THKK' AND THE SHARP SOUND OF A SONG 

UNDER OLIVES 
WHEN I LAY IN THE INGLE OF CIRCE 

1 HEARD A SONG OF THAT KIND. 

YOU ARE IN CONTROL STATE 

DRILL 

DESOLATE IS THE ROOF WHERE THE CAT SAT, 

DESOLATE IS THE ROOF WHERE THE CAT SAT, 

18 

IN HILL PATH: 'THKK, THGK' 
IN HILL PATH: 'THKK, THGK' 

2 0,9 
I HEARD 
I HEARD 
13 .5 

OF THE LOOM 
OF THE LOOM 
6. 2 

AND THE CORNER POST WHENCE HE GREETED THE SUNRISE, 

AND THE CORNER POST WHENCE HE GREETED THE SUNRISE 

18.7 

UNDER OLIVES 



A SONG OF THAT KIND. 
A SONG OF THAT KIND. 



YOU ARE IN CONTROL STATE 

STOP 

NO OBSERVATIONS; HENCE NO STATISTICS 
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APPENDIX A 
SAMPLE TERMINAL SESSION 



)1776 

010) 19 32„36 07/03/68 JANET 



12 



12 



7 

1. 44 

1 4 
~5 

10 

18 

16 
24 



A P L \ 3 6 

3xi+ 

X«-3xi+ 

X 

X+Y 
144£'~2 



P«-l 2 3 4 
PxP 
9 16 
P-x-Y _ 
10 15 20 
Q+ 1 CATS' 
Q 

YZ+-5 

YZ1+5 

YZ+YZ1 

3+4x5+6 
v 
+ 5 + 6 

X+3 
Y<-4 
(Zxy)+4 

1x7+4 



FUNDAMENTALS 

Entry automatically indented 
Response not indented 
X is assigned value of 
the expression 

Value of X typed out 
Negative sign for negative 
constants 



Exponential form of constant 

Four-element vector 

Functions apply element by element 

Scalar applies to all elements 

Character constant (4-element 
vector) 

Multi-character names 



Correction by backspace 
and linefeed 



Executed from right to left 
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X Y 

SYNTAX ERROR 
X Y 

A 

XY 
VALUE ERROR 
XY 

A 



2 0.4 

12 

24 



4x3T5.1 
( 4x3)T5o 1 

4*r 5. i 

X<-\5 

X 

3 4 5 

\0 



Y+5-X 

Y 
4 3 2 10 

X[Y 
4 3 3 4 5 

X<Y 
110 

Ol 
3. 141592654 

0*1 2 
3.141592654 1.570796327 

*«-4 5 9 

OZrl80 

0.7 8 53981634 1.570796327 

lol 
0.8 418 7 09848 

201 2 
0.5403023059 "0.4161468 365 

301 
1. 557407725 

~30l 
0. 7853981634 

30~30t 7 
12 3 4 5 6 7 

y-f-i 2 

4oy 

1.414213562 2.236067977 
OOrY 

0.8660254038 

701 2 
0.761594156 0.9640275801 
70701 2 

1 2 



Entry of invalid expression 
Shows type of error committed 
Retypes invalid statement with 

caret where execution stopped 
Multi-character name (not X*Y) 

XY had not been assigned a value 

SCALAR FUNCTIONS 

Dyadic maximum 

Monadic ceiling 

Index generator function 



Empty vector 

prints as a blank line 
All scalar functions extend 

to vectors 



Relations produce 

logical (0 1) results 
Pi*l 

Pi^l 2 



Conversion of X to radians 

Sin 1 

Cos 1 2 

Tan 1 

Arctan 1 

Tan Arctan 12 3 4 5 6 7 

( 1+1*2)*. 5 
( 1-tJ*2)*. 5 
Tanh 1 2 
Arctanh Tanh 1 2 
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DEFINED FUNCTIONS 



[1] 
[2] 



10 

20 

[1] 
[2] 



VZ«-X F Y 

Z*-( U*2) + I*2)*,5 

V 

3 F 4 

P«-7 

e-*-(p+i)f p-i 

Q 

M-x3 F 4 

B«-(j4>0)-/1<0 

V 
G 4 



Header (2 args and result) 
Function body 
Close of definition 
Execution of dyadic function F 



Use of F with expressions 
as arguments 



G is the signum function 
A and B are local variables 



[1] 

[2] 



1 
VALUE 



Cl] 
C2] 
C3] 
C4] 
C5] 
[6] 
[7] 

6 

120 



FACL3 
FACL5 
FAC13 
FACL5 
FAC13 
FACl 5 
FAC13 



A> 6 
G X 

VH A 

P<-(A>0)-A<0 

V 

H"6 

P 

Y+-H~6 
ERROR 
Y+-H ~6 

A 

VZ+FAC N;I 

Z + l 

T-<-0 

L1:I+I+1 

->0x iI>N 

Z<-Zxl 

-+L1 

V 

FAC 3 

FAC 5 

ThFAC^-3 5 

X+FAC 3 
] 1 
] 1 
] 2 
] 2 
] 3 
] 6 
] *+ 

T/\FAC+0 



Like G but has no explicit result 
P is a global variable 



H has no explicit result 

and hence produces a value 
error when used to right 
of assignment 

FAC is the factorial function 



Ll becomes 3 at close of def 
Branch to (out) or to next 

Branch to Ll (that is, 3) 



Set trace on lines 3 and 5 of FAC 
Trace of FAC 



Reset trace control 
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MECHANICS OF 
FUNCTION DEFINITION 



LI] 
[2] 
[3] 
[4] 
[2] 
[5] 
Cl] 
Cll 

Cl] 
[2] 
[3] 
[4] 

[5] 
[6] 



C6] 
[4.2] 

V 
[1] 
C2] 
[3] 
[4] 
C4.1] 
C5] 

V 
C6] 



8 
4 
4 



36 
8 



Cl] 
C2] 
C3] 
[43 
C5] 
C6] 



C7] 



VG+M GCD N 
G+-N 
M-<-M\ N 
->-4xAf*0 
C 1 ] G<-M 

C1D] 

G+M 

CD3 

G+M GCD N 

G*-M 

M+-M\N 

->4xA/*0 

N+G 



■+1 

V 
36 



GCD 4 4 



1GCD 

C4„ 1]M,N 

CD] 

G<-M GCD N 

G+-M 

M<-M\N 

■*4xM*0 

M,N 
■+1 



V 
36 



GCD 4 4 



VGCCCD3V 

ff-«-Af 
M+M\N 

N*-G 
M,N 
->1 

VGCD 
[5] 

A 

V 



Greatest common divisor 

function based on the 
Euclidean algorithm 

Correction of line 1 
Resume with line 4 
Display line 1 

Display entire GCD Function 



Close of display, not close of def 

Enter line 5 

Close of definition 

Use of GCD 

4 is GCD of 36 and 44 

Reopen def (Use V and name only) 

Insert between 4 and 5 

Display entire function 



Fraction stays until close of def 

End of display 
Close of definition 

Iterations printed by 

line 5 (was line 4.1) 
Final result 
Reopen, display, and close GCD 



Line numbers have been 

reassigned as integers 
Close (Even number of V's in all) 
Reopen definition of GCD 
Delete line 5 by linefeed 

Close definition 
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[1] 

[2] 
Cl] 

[1] 
[2] 

120 



VZ+ABC X 

Z<-( 33x£+(i?x5)-6 

[1QQ] 

Z<-( 33x£+(i?x5)-6 

/ 1 /l 

Z«-( 3x<2) + (Tx5)-6 
V 
FAC 5 



) ERASE FAC 
FAC 5 
SYNTAX ERROR 
FAC 5 

A 

VZ«-BIff ff 
[1] LA°.Z+(Z, 0) + ,Z 
[2] ->-LAxff>pZV 

Biff 3 
FylLt/ff ERROR 
BIff[l] LA:Z+(Z,0)+0,Z 

A 

Z«-l 

->1 

13 3 1 
BIN 4- 

BJffE 1] LI: Z-KZ ,0)+0,Z 

A 

VBIffC „1]Z«-1V 

)SI 
BIffCl] * 

■*1 
1 4 6 i+ 1 

VBIffCO'jV 
V Z+-BIff ff 
[1] Z«-l 

[2] L4:Z^(Z,0)+0,Z 
[3] -+LA*N>pZ 
V 

SbBIN+2 

Q+BIN 3 

BIff[2] 



A function to show line editing 

A line to be corrected 

Initiate edit of line 1 

Types line, stops ball under 9 

Slash deletes, digit inserts spaces 

Ball stops at first new 

space. Then enter ) T 
FAC still defined 

Erase function FAC 

Function FAC no longer exists 



An (erroneous) function for 
binomial coefficients 



Suspended execution 

Assign value to Z 

Resume execution 

Binomial coefficients of order 3 

Same error (local variable Z 

does not retain its value) 

Insert line to initialize Z 
Display state indicator 
Suspended on line 1 of BIN 
Resume execution (BIN now correct) 

Display revised function 
and close definition 



Set stop on line 2 
Execute BIN 

Stop due to stop control 
Display current value of Z 



Resume execution 



BIff[2] 



+2 



Stop again on next iteration 
Resume 



Biff [2] 



■+0 



Stop again 

Branch to (terminate) 
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INPUT AND OUTPUT 





VMULT DRILL N ; Y ; X 


[1] 


Y<-?N 


C2] 


Y 


[3] 


X+-U 


C4] 


-+Qx\X=' S' 


C5] 


->iZ=x/J 


[6] 


'WRONG, TRY AGAIN 


[7] 


->3V 




MULTDRILL 12 12 


2 1 





0: 






37 


WRONG, TRY AGAIN 


D: 






20 


6 7 




D: 






1 S I 




VZ+ENTERTEXT 


El] 


Z*-' ' 


[2] 


£«-pZ 


C3] 


z«-z,Q 


C4] 


->2x£* p z 


[5] 


V 




Q+-ENTERTEXT 


THIS 


IS ALL 


CHARACTER INPUT 



Q 
THIS IS ALL CHARACTER INPUT 

N<-5 

'NOTE: i ' ;N; ' JS ';itf 
^02*5: 1 5 IS' 1 2 3 4 5 



A multiplication drill 

pN random integers 

Print the random factors 

Keyboard input 

Stop if entry is the letter S 

Repeat if entry is correct product 

Prints if precedincr branch fails 

Branch to 3 for retry 

Drill for pairs in range 1 to 12 

Indicates that keyboard entry 
is awaited 



Entry of letter S stops drill 
Example of character (□) input 
Make Z an empty vector 
D is the length of Z 
Append character keyboard entry 
Branch to 2 if length increased 
(i.e., entry was not empty) 

Keyboard 

entries 
Empty input to terminate 
Display Q 



Mixed output statement 



5 
2 



P<-2 3 5 7 
pP 

T<-'0H MY 1 
pT 



P,P 
5 7 

T,T 
OH MY OH MY 

T,P 
DOMAIN ERROR 

T,P 

A 



RECTANGULAR ARRAYS 

Dimension of P 
Character vector 

Catenation 



Characters cannot be catenated 
with numbers 
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AH 2 3p2 3 5 7 11 13 Reshape to produce a 2x3 matrix 
M Display of an array of rank >1 

is preceded by a blank line 

2 3 5 
7 11 13 

2 4p? A 2x4 matrix of characters 

OH M 
YOH 

6pM A matrix reshaped to a vector 

2 3 5 7 11 13 

,M Elements in row-major order 

2 3 5 7 11 13 

P[3] Indexing (third element of P) 

5 

PC 1 3 5] A vector index 

2 5 11 

PC i 3] The first three elements of P 

2 3 5 

PCpP] Last element of P 

13 

M[l;2] Element in row 1, column 2 of M 

3 

Mil; ] ROW 1 Of M 

2 3 5 



Mil 1;3 2] Rows 1 and 1, columns 3 2 



5 3 
5 3 



BCE 
GKM 



EC 
EC 



A+- x ABCDEFGHIJKLMNOPQ' The alphabet to Q 

AIM] A matrix index produces 

a matrix result 



AlMll 1 ;3 2]] 



Af[l;]<-15 3 12 Respecifying the first row of M 

M 



15 3 12 

7 11 13 
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Q+-3 1 5 2 i+ 6 
PLQ1 
5 2 11 3 7 13 

5 3 4 12 6 

PC 3] 
5 

)ORIGIN 
J/AS 1 

P[3] 
7 

P[0 1 2] 
2 3 5 

l 5 
12 3 4 

)ORIGIN 1 
IMS 

t5 
12 3 4 5 



A permutation vector 
Permutation of P 

A new permutation 

Present index origin is 1 

Set index origin to 

First three elements of P 

Result of index generator 
begins at origin 



7«-?3p9 

M+-?3 3p9 
/IN-? 3 3p9 

V 
1 

M 



FUNCTIONS ON ARRAYS 

Vector of 3 random integers (1-9, 
Random 3 by 3 matrix 
Random 3 by 3 matrix 



7 
5 

1 

1 
4 

9 



9 4 
8 1 
5 7 

N 
4 1 

7 6 

8 5 
M+N 



8 13 

9 15 
10 13 



5 

7 

12 



Sum (element-by-element) 
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M{ N Maximum 

7 9 4 
5 8 6 
9 8 7 

M<N Comparison 


1 
110 

+/V Sum- reduction of V 

10 

*/V Product- reduction 

14 

+ /[1]A/ Sum over first coordinate of M 

13 2 2 12 (down columns) 

+/121M Sum over second coordinate of M 

(over rows) 

20 14 13 

+/M Sum over last coordinate 

2 14 13 

r/Af Maximum over last coordinate 

9 8 7 

X<-1. 5 

+/(1 2oA')*2 Sin squared plus Cos squared 

1 

o/l 2,X Sin Cos X 

0. 07067822453 

7+-O/0 2,X (1-(C0S Z)*2)*,5 

¥ 
0, 9974949866 

I=loX An identity 

1 

Af+»x/^ Ordinary matrix ( + ,x inner) 

product 

79 123 81 
46 84 58 
84 95 66 

M+ , <N An inner product 

111 
111 
2 3 2 

M+,x-V +„x inner product with vector 

51 2 5 5 6 right argument 
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V 
2 17 

v ° - x i 5 Outer product (times) 

2 4 6 8 10 

12 3 4 5 

7 14 21 28 35 

V° „<\9 Outer product 

011111111 
111111111 
00 0000111 

v ° • *M An outer product of rank 3 

14 18 8 

10 16 2 

2 10 14 

A blank line between planes 
7 9 4 
5 8 1 
15 7 

49 63 28 

35 56 7 

7 35 49 

MIXED FUNCTIONS 

#-<-?10p5 A random 10 element vector 

Q (ranqe 1 to 5) 

1434542*142 

+/Cl]Q°.=i5 Ith element of result is number 

2 2 14 1 of occurences of the 

value I in Q 
2 1§M Ordinary transpose of M 

7 5 1 
9 8 5 
4 17 

§M Ordinary transpose of M (monadic) 

7 5 1 Xy - 

9 8 5 
4 17 
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T+2 3 4pi24 An array of rank 3 

T 

12 3 4 
5 6 7 8 
9 10 11 12 

13 14 15 16 
17 18 19 20 
21 22 23 24 

3 1 2^r Transpose of T (dimension 

of result is 3 4 2) 

1 13 

2 14 

3 15 

4 16 

5 17 

6 18 

7 19 

8 20 

9 21 

10 22 

11 23 

12 24- 

1 1§M Diagonal of M 

7 8 7 

1 1 2S?r Diagonal section in first 

two coordinates of T 

12 3 4 
17 18 19 20 . 

*«-o(o,i5)*6 r-'-i'.!--^"--' , i--6f 

) DIGITS 4 Set number of output digits to 4 

WAS 10 

is?l 2 3o„oX 

Table of sines, cosines, and 
tangents in intervals 
of 30 degrees 



0. 


, OOOtfO 


1, 


. 000ff0 


0. OOOffO 


5„ 


OOOff 1 


8, 


, 660#~1 


5. 774£~1 


8„ 


6&0E~1 


5. 


000E 1 


1. 732£0 


1. 


OOOffO 


1, 


, 744tf~16 


5. 734£15 


8. 


660E 1 


5< 


,000£ 1 


1. 732£0 


5. 


Q00E 1 


"8 , 


.eeofi 1- ! 


~5. 774E 1 
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Q 

1434-542142 

3<t># Rotate to left by 3 places 

4 542142143 

~3<$>Q Rotate to right by 3 places 

1421434542 

1 2<|>[l]A/ Rotate columns by 

different amounts 

7 8 7 
5 5 4 
1 9_ 1 

2<t>C 2 DAf Rotation of rows all 

by 2 to right 

9 4 7 

8 15 
5 7 1 

1 2 3$>M Rotation of rows 

9 4 7 
15 8 
15 7 

4><2 Reversal of Q 

2412454341 

<t>Cl]M Reversal of M along 

first coordinate 

15 7 
5 8 1 
7 9 4 

$M Reversal along last coordinate 

4 9 7 
18 5 
7 5 1 
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U 
1 

U/Q 
5 

1 

5 







+ /U/Q 

1 1/lllM 

7 9 4 
15 7 

1 1/M 

7 4 
5 1 
1 7 

( ,M>5)/,M 
7 9 8 7 

7<-l 10 1 
V\\3 
10 2 3 
AM 

7 9 4 

5 8 1 

10 5 7 
V\'ABC 
ABC 

10x1 7 7 6 
1776 

1022 
1 7 



7 

6 



7 

7 

6 

3805 

1 3 

22 



8ll 7 7 6 

( 4plO)Tl776 

7 6 

( 3plO)Tl776 

6 

10 10T1776 

10T1776 

24 60 6011 3 25 

24 60 60T3805 

25 

2ll 110 



Compression of Q by logical 

vector U 
Compression by not U 



Compression along first 
coordinate of M 



Compression along last 
coordinate 



,M is 794581157 

All elements of M which exceed 5 

Expansion of iota 3 

Expansion of rows of M 



Expansion of literal vector 

inserts spaces 
Base 10 value of vector 17 7 6 

Base 8 value of 1 7 7 6 

4 digit base 10 representation 

of number 1776 
3 digit base 10 representation 

of 1776 



Mixed base value of 1 3 25 

(time radix) 
Representation of number 3 805 

in time radix 
Base 2 value 
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M 



1 


9 4 


5 


8 1 


1 


5 7 




)ORIGIN 


WAS 1 






A/[2;0] 


1 






( ,W)[(pW)±2,0] 


1 






) ORIGIN 1 


IMS c 


) 




P 


2 3 


5 7 11 13 




Pi7 


4 






Pi6 


7 






Pi 4 5 6 7 


7 3 


7 4 




$+-51324 




R+Qi \pQ 




R 


2 4 


3 5 1 




QLR1 


1 2 


3 4 5 




A*- » AB CDEFGHIJKLMNOPQ ' 




A<-4 , ' RSTUVWXYZ' 




A 


ABCDEFGHIJKLMNOPQRSTUVWXYZ 




A\ 'C 


3 






«7<-i4i '(7/12" 




J 


3 1 


20 


A[«n 




CAT 





Indexing of matrix in 0-origin. 

Note relation to indexing of 
ravel of M 

Restore 1-origin 



Index of 7 in vector P 
7 is 4th element of P 
6 does not occur in P, hence 
result is 1+pP 



A permutation vector 

R is the permutation inverse to Q 



A is the alphabet 

Rank of letter C in alphabet is 3 
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A/f-3 5p ' 


THREESHORTWORDS' 




A? 






THREE 








SHORT 








WORDS 


J*-A\M 
J 






20 


8 18 


5 


5 


19 


8 15 


18 


20 


23 


15 18 
AU1 


1 


19 


THREE 








SHORT 








WORDS 


3? 5 






5 1 


2 
6? 5 






DOMAIN ERROR 








6? 5 








A 








A> 8 ? 8 








X 






4 6 


7 2 5 

ix 


1 


8 3 


6 ^■ 


8 15 


2 


3 7 


1 2 


3 M- 5 


6 


7 8 


8 7 


6 5 1 


3 


2 1 



A matrix of characters 



U+A e 1 NOW IS THE TIME ' 
. ' 01' ll+Ul 
00001001100011100011001000 

V/A 
EHIMNOSTW 

(i8)e3 7 5 
00101010 



Ranking of M produces a matrix 



Indexing by a matrix produces 
a matrix 



Random choice of 3 out of 5 
without replacement 



A random permutation vector 

Grading of X 

Arrange in ascending order 

Arrange in descending order 

Membership 
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APPENDIX B 



ADVANCED EXAMPLES 



This section presents a set of examples less elementary 
than those of Appendix A. These examples are all contained 
in Workspace ADVANCEDEX of Library 1. A user may therefore 
load, use, and trace any of the functions as an aid to 
understanding their behavior. Displays of intermediate 
results may also be inserted. For example, the statement 

P<-(P, 0) + ,P 

occurring in a function could be changed (perhaps by the use 
of line editing) to the following form: 



Each execution of the statement will now perform as before, 
except that each of the results ,P and P,0 and P will be 
typed out as well (in that sequence). 

Programming techniques can be learned from a similar 
study of any well-written set of functions. All of the 
workspaces of library 1 may be used as a source of functions 
for such study. 



to 1. 



The index origin in the workspace ADVANCEDEX is set 





)L0AD 1 ADVANCEDEX 










SAVED 


16.41.30 


09/06/72 












) WIDTH 6 5 














WAS 120 
















)FNS 














AH 


ASSOC 


BIN 


COMB 


DTH 


ENTER 


F 


FC 


GC 


GCD 


GCV 


HI LB 


HTD 


IN 


INV 


INVP 


INI 


LFC 


LOOKUP 


PACK 


PALL 


PER 


PERM 


PO 


POL 


POLY 
)VARS 


POL IB 


RESET 


TIME 


TRUTH 


UNPACK 


ZERO 


DAE 


DASSOC 


DATA 


DBIN 


DCOMB 


DDTH 


DENTER 


DESCRIBE 


DF 


DEC 


DGC 


DGCD 


DGCV 


DHILB 


DHTD 


DIN 


DINV 


DINVP 


DIN1 


DLFC 


DLOOKUP 


DPACK 


DPALL 


DPER 


DPERM 


DPO 


DPOL 


DPOLI 


DPOLYB 


DTIME 


DTRUTH 


D UNPACK 


DZERO 


J 
DESCRIBE 


NAMES 


P 


PI 


P2 


TIMER 


Z 



EACH OF THE VARIABLES OF THIS WORKSPACE WHICH BEGINS WITH THE 

LETTER D IS THE DESCRIPTION OF THE FUNCTION WHOSE NAME IS OBTAINED 

BY REMOVING THE D. FOR FURTHER DETAILS SEE APPENDIX B OF THE 
APL\360 USER'S MANUAL. 
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DPACK 
THE FUNCTIONS PACK AND UNPACK ILLUSTRATE THE USE OF THE 
ENCODE AND DECODE FUNCTIONS IN TRANSFORMING BETWEEN A FOUR- 
NUMBER ENCODING OF SERIAL NUMBER (1 TO 9999), MONTH, DAY, 
AND YEAR, AND A SINGLE-NUMBER ENCODING OF THE SAME DATA, 

VPACKlOlV 

V Z+-PACK X 

[1] Z<- 10000 12 31 100 lX-1 
V 

VUNPACKLDlV 

V Z+UNPACK X 

[1] Z«-l+ 10000 12 31 100 TX 
V 

P-<rPACK 2314 7 17 68 

P 
86063867 

UNPACK P 
2314 7 17 68 

UNPACK PACK 2311 9 21 72 
2311 9 21 72 

PACK UNPACK 92137142 
92137142 

PACK 1 1 31 1 
3000 

UNPACK 30 
1 1 31 1 
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D ENTER 

THE FUNCTIONS ENTER, LOOKUP, AND RESET ILLUSTRATE A METHOD 
OF CONSTRUCTING AND USING LISTS OF VARIABLE LENGTH DATA, 
REPRESENTING EACH LIST BY A VECTOR OF CHARACTERS AND A 
VECTOR OF INDICES, ENTER AND LOOKUP EACH REQUEST INPUT (BY Q) 
UNTIL AN EMPTY VECTOR (CARRIAGE RETURN ALONE) IS ENTERED, 



RESET RESETS LISTS (USE BEFORE ENTER AND LOOKUP), 
ENTER ACCEPTS SUCCESSIVE ITEMS OF NAMES AND DATA. 
LOOKUP PRINTS DATA ASSOCIATED WITH EACH NAME ENTERED, 



CI] 
[2] 
[3] 
C4] 
[5] 
[6] 
[7] 
[8] 
[9] 
CIO] 



VENTERlUlV 
ENTER ;X 
'ENTER NAME' 

x+,a 

-►Oxi 0=p* 

NAMES+-NAMES ,X 

Pl+Pl,p NAMES 

'ENTER DATA' 

DATA+-DATA ,Q 

P2+-P2 ,pDATA 
t t 

-►1 



Ci] 

C2] 
C3] 
C<+] 

C5] 
C6] 
C7] 
C8] 
C9] 
CIO] 

[11] 



VLOOKUP101V 
V LOOKUP ;X\ J 

-*-0*iO=pZ 

J*-( (( l+Pl)-~l+Pl)=p*)/l 
J<-( NAMESlPli J] o , + i P A-]a, 
■+(0 1 =pV)/ 10 8 



1 + pPl 
=X)/J 



->1 ,p\j+-' MORE THAN ONE 

DATALP21J1 + X-/P2H 

-*1 

'NO SUCH NAME' 

■+1 



SUCH NAME' 
+</]] 



Cl] 



VRESETLDlV 

RESET 

NAMES+-DATA<-pPl<rP2+0 



ENTER 



RESET 
ENTER 
NAME 



J\ ARMSTRONG 
ENTER DATA 
PRESIDENT 

ENTER NAME 
H. LEVINE 
ENTER DATA 
VICE-PRESIDENT 

ENTER NAME 

LOOKUP 

9 

H. LEVINE 

VICE-PRESIDENT 

? 

L. YAVNER 
NO SUCH NAME 

9 
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DIN 

THE FUNCTIONS IN AND INI TAKE TWO ARGUMENTS; THE FIRST IS A 
WORD {I.E., A VECTOR) WHOSE OCCURRENCES IN THE SFCONT) 
ilnT/J *** T ° ™ ™™RMINED . THE RESULT IS A VECTOR OF 

IZrrnrL °* ' TS * FIRST LETTER 0F EACU OCCURRENCE. THE 

FUNCTION IN DETERMINES ALL OCCURRENCES, WHEREAS INI 

Zl E A M ri N r ES ° NLY ALL "ON -OVER LAPPING OCCURRENCES BY FIRST 
APPLYING THE FUNCTION IN AND THEN SUPPRESSING ALL OVERLAPS 

V Z+A IN B;J 
Cl] J+{Atll=B)/\pB 
[2] J+{J<l+{pB)-pA)/J 

[3] Z^-(5[ s 7o„ + -i +lp 4] Ao = A )/j 

V 

VltflCDJV 

V T*-A INI B 
C 1 1 T+-A IN B 

[2] ^*J<pT+{~{xpT)eJ*-l + {{pA)>\-/tl]{2,l + pT)pT)M)/T 

W^-' THE' 

T+'THE MEN THEN WENT HOME. 

W IN T 
1 9 

W INI T 
1 9 

'ABA' IN ' NOWABABABABABABABA' 
'+ 6 8 10 12 14 16 

'ABA' INI 'NOWABABABABABABABA' 
'+ 8 12 16 

D TRUTH 

l H J,I UNCTI0N TRUTH PR0D VCES THE MATRIX OF ARGUMENTS OF THE 
TRUTH TABLE FOR N LOGICAL VARIABLES. ""*»** ut Itit, 

VTRUTHlQlV 

V Z+-TRUTH N 

Cl] Z^2 | L(~l+i2*tf)°, *2*N-iN 

V 

TRUTH 3 


















1 





1 








1 


1 


1 








1 





1 


1 


1 





1 


1 


1 




{TRUTH 3) + „x<|>2*~l + i3 


1 


2 


3 4 5 6 7 
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DGCD 

THE FUNCTIONS GCD AND GC EACH EMPLOY THE EUCLIDEAN ALGORITHM 
TO PRODUCE THE GREATEST COMMON DIVISOR. GCD EMPLOYS TWO 

SCALAR ARGUMENTS, WHEREAS GC EMPLOYS A SINGLE ARGUMENT WHICH 
IS EXPECTED TO BE A TWO-ELEMENT VECTOR. 

THE FUNCTION GCV YIELDS THE GREATEST COMMON DIVISOR OF ALL 
ELEMENTS OF A VECTOR OF TWO OR MORE ELEMENTS. 

VGCDLDlV 

V Z<-M GCD N 
Cl] Z+M 

C 2 ] M+M I N 
[3] N+Z 
[4] +o*M 
V 

VGC[D]V 

V Z+GC M 

Cl] ->0*1+M^4>M[1] ,Z«-| IM 
V 

VGC7[Q]7 

V Z+GCV W;A 

[1] -H*i>W4-Z,(A*0)/A + (.Z + L/W)\W 
V 



6 
6 
6 
6 
3 



8 4 GCD 9 

9 GCD 8 4 
GC 90 84 
GCV 90 84 
GCT 90 84 105 



DBIN 

THE FUNCTION BIN PRODUCES ALL BINOMIAL COEFFICIENTS UP TO ORDER N 

VBTtfCD]V 
V Zt-BIN N 
Cl] ZH$( Q,\N) o. JO, iff 

V 

BI/V 4 

10 
110 

12 10 

13 3 10 

14 6 4 1 
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DPOLY 

P0 E ry/nMr7r I0NS rnl° LY ' P0L > P ° ' AND P0LW ^CH evaluate a 
POLYNOMIAL (OR POLYNOMIALS), WHOSE COEFFICIENTS ARE 

DETERMINED BY THE FIRST ARGUMENT, AND WHOSE POINT (OR 
ill^VnJll EVALUATI0N IS DETERMINED BY THE SECOND ARGUMENT. 

i H n f 7PD ° c 0EFFICIENTS ARE ™ ASCENDING ORDER OF ASSOCIATED 
L U W a no <, 

POLY SCALAR RIGHT ARGUMENT ONLY, 

POL SCALAR RIGHT ARGUMENT ONLY (USES INNER PRODUCT) 
POLYB SCALAR RIGHT ARGUMENT ONLY (USES BASE VALUE) 
PO APPLIES TO ARGUMENTS OF ANY RANK, THE VECTORS ALONG 

THE FIRST COORDINATE OF THE FIRST ARGUMENT ARE THE 
COEFFICIENTS OF THE POLYNOMIALS WHICH ARE EVALUATED 
FOR EACH ELEMENT OF THE SECOND ARGUMENT, 

L1J „ z++/c*x* 1 +IP ,C [l] Z+X±$C 



V 



V 



V 



z+(x*-i + , p ,o) + ,xc Cl] z-(jro,*- 1 + llppC)+iXC 

V 



C+l 2 3 4 
C POLYB 3 



(C POLY 3)a,=(C POLYB 3),(C POL 3),C PO 3 



14 2 

1 

C PO 1 2 3 4 5 6 

10 49 142 313 586 985 

U<-M*-§BIN 5 

1 1 1 1 1 1 

12 3 4 5 

1 3 6 10 

1 4 io 

15 

1 

IM PO 16 

1 2 4 

1 3 g 27 

1 4 16 64 

1 5 25 125 

1 6 36 216 

1 7 4 9 34 3 



8 16 32 

81 243 

256 1024 

625 3125 

1296 7776 

2401 16807 
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DTIME 

THE FUNCTION TIME YIELDS TEE AMOUNT (IN MINUTES, SECONDS, 
AND 60THS OF A SECOND) OF CPU TIME USED SINCE ITS LAST 
PREVIOUS EXECUTION. IT IS USEFUL IN MEASURING THE EXECUTION 
TIMES OF OTHER FUNCTIONS. THE VARIABLE 'TIMER 1 IS ASSIGNED 
THE VALUE OF THE CUMULATIVE CPU TIME AT EACH EXECUTION OF 
THE FUNCT1 ON TIME. 
VTIMEiDlV 

V Z*-TIME;T 

[1] Z«- 60 60 60 T(T<-I21)-TIMER 
[2] TIMER<-T 
V 

DCOMB 

THE FUNCTION COMB EMPLOYS RECURSIVE DEFINITION TO PRODUCE A 
21N BY 2 MATRIX OF ALL POSSIBLE PAIRS OF ELEMENTS FROM \N. 

THE FUNCTION FC SHOWS AN ALTERNATE METHOD WHICH YIELDS THE 
SAME PAIRS BUT IN A DIFFERENT ORDER. 

THE FUNCTION LFC EMPLOYS FC TO GENERATE LETTER PAIRS. 
VCCWBEQJV 

V C+COMB N;A;B 
[1] ^0xi/V<2 

[2] ->Ox l /l/ = 2xlpC<- 1 2 p 1 2 

[3] A<-COMB N-l 

[4] CH (pA) + (N-l) ,0)p( ,A) , ,( xN-l)o Jo.ff 

V 

VFCCD]V 

V C+FC N;A;B 
[1] B*-(.\N)o.+NpQ 
[2] A+( iJf)o. + iJ? 

[3] C+-(2,N*N)p( ,B) , ,A 

[4] C^(CL2;1<N)/C 

V 

VLFCCDlV 

V Z+-LFC N 

[1] Z*- 1 ABCDEFGHIJKLMNOPQRSTUVWXYZ' IFC N] 

V 

TIME 
35 

TIME 
2 

COMB 4 FC 4 LFC 4 

12 12 ^S 

13 13 AC 
2 3 14 AD 

1 4 2 3 BC 

2 4 2 4 BD 

3 4 3 4 CD 

TIME TIME TIME 

00 12 008 007 
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Z+-COMB 15 Z+-FC 15 

pZ pZ 

105 2 105 2 

TIME TIME 

14 29 

DDT 7 // 

THE FUNCTIONS DTIl , HTD , AND AH CONCERN HEXADECIMAL NUMBERS 
LIMITED TO 8 DIGITS AND EMPLOYING THE CHARACTERS 

0123456789<4/3CZ)£7 : \ NEGATIVE NUMBERS ARE REPRESENTED IN 2'S 

COMPLEMENT FORM, WITH ANY OF THE CHARACTERS 8 THROUGH F IN 
THE LEFTMOST POSITION (OF EIGHT). LEADING ZEROS MAY BE 

OMITTED „ 

DTH CONVERTS DECIMAL TO HEXADECIMAL, 
HTD CONVERTS HEXADECIMAL TO DECIMAL, 
AH ADDS HEXADECIMAL NUMBERS - 

V/J>TO[Q]V 

V R<~DTH X 

[1] /?■*-,( '0123 4 56789 ABCDEF' )[1 + (8 P 16)tI] 

V 

v//TOcmv 

V R<-HTD X 

CU /?<-( (8-p^/Dp '0' ),* 

[2] i?«-L ( IE J. 1+' 0123*567B9ABCDEF' i/?)-(2*32)xf?[l] e ' 8 9ABCDEF' 

[3] -*-4x~A/A , e ' 012 3 4 56 78 9^SCZ)£'F' 

[ 4 ] j?«- • ' 

[5] 'NUMBER IS NOT HEX' 
V 

V/3tf[D]V 

V R+-A AH B 

C 1 ] R<DTH(H TD A)+H TD B 

V 

Z+DTH 1776 

Z 
000006F0 

//TO Z 
1776 

Z j4# Z 
OOOOO/JffO 

//TO Z AH Z 
3 5 5 2 

//TD '000006F0' 
1776 

HTD '90000000* 
18 7 904819 2 

HTD ' 00049//FC7' 
NUMBER IS NOT HEX 
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DZERO 

THE FUNCTION ZERO EMPLOYS THE METHOD OF FALSE POSITION TO 
DETERMINE TO WITHIN A TOLERANCE TOL A ROOT OF THE FUNCTION F 
LYING BETWEEN THE BOUNDS B[l] AND B[2], IT IS ASSUMED THAT 
F Bill AND F S[2] ARE OF OPPOSITE SIGN, THE FUNCTION F IS A 
SPECIFIC POLYNOMIAL, BUT CAN BE CHANGED TO ANY DESIRED 
FUNCTION. 

VZEROLQlV 
V Z+TOL ZERO B;T 
[1] ■+QxiTOLZ\T+F Z«-0„5x + /B 
C2] -*1 ,B[2l(0<2 I )*0<F fl]«-Z 



VF[Q]V 
V Z+F X 
[1] Z-r "20 18 3 5 1 PO X 

V 

D«-X«-~4+i9 
~3 "2 "1 1 2 3 4 5 

F X 
169 12 "29 20 ~3 4 7 36 145 

TIME 
1 19 

n*-R--lE~6 ZERO ~2 "1 
"1 ,845121413 

TIME 
2 36 

F R 
7,1414 814ff 7 

TIME 

2 

Q+-FD«-tf-<-l£'~10 ZE7?C 1 2 

1 ,26397094 

"1 ,813305062ff~ll 

TIME 
3 46 

Q^FQ^/?^12~'6 Z£7?0 1 2 
1,263970852 
"80518883595 1 7 

2 13 
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DHILB 
THE FUNCTION HILB PRODUCES A HUBERT MATRIX OF ORDER N. 

VtfJLBCQJV 
V Z+HILB N 
[1] Z-*-t"l + ( \N)°. + \N 
V 

HILB 3 



1 

0„ 5 

o 3333333333 

DINV 



0. 5 

0. 3333333333 

0„ 25 



0. 3333333333 
0. 25 
0. 2 



2W FUNCTIONS INV AND INVP EACH PRODUCE THE INVERSE OF THE 
MATRIX ARGUMENT SUPPLIED, EMPLOYING GAUSS -JORDAN (I E 
COMPLETE) ELIMINATION. INVP EMPLOYS PIVOTING AND INV DOES 

THE FIRST LINE APPENDS THE UNIT VECTOR 1>\N AS THE LAST 
COLUMN OF THE ARGUMENT AND THE SECOND LINE (LINE 4 IN INVP) 
PERFORMS AT EACH ITERATION ONE OF THE N COMPLETE INVERSIONS 
REQUIRED. SEE EXERCISE 1 . 40 OF IVERSON , A PROGRAMMING 

LANGUAGE, WILEY, 19 62„ " 

V Z+INV M;I;J 

M^(l +pAOp(,JM/) t ~«r*-l<tI«-i+pM 

M^l <}>(</, 1 )c|>[ 1 ]M- (J-xM[ ; l ]) o „ xM[l ; >M[ 1 ;] vMLl ; 1 ] 
+ 2x i OtIt-I-1 



Cl] 
[2] 
C3] 
[4] 



Z<-ML ; dtptf] 
V 

VINVPLQ1V 
V Z<-INVP M;I;J;K;P 
[1] A/«-lp(l +pAf)p(,lpAf) 
[2] MZK.liipPl-MLl,K+( 
[3] P-KKfrP.OpPCtf.l J 

[4] Af«-l<t>(«r,l )4>[1]W 
[5] ->2*i 0*I<-J-1 

C6] Z^f[;iP] 



~j4-KP4-\It-l \QM 

AfLiI;l])ir/ |Af[iI;l] 
(JxMl ;l])o 



ipP] 
xtf[l ;]«-tf[l ;]*Af[l ;1] 



0«-tf+-IW M+HILB 3 



9 
"36 

30 



36 

192 

"180 



M+ . xN 



30 

"180 

180 



1 . 00000000 Off 
1 - 421085472£'~14 
4„ 662936703i?~15 



2„ 842170943£~14 
1 o 000000000ff0 
3„197442311£'~14 



6 . 039613254£~14 
"1 , 065814104£'~14 
1 „ OOOOOOOOOffO 
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DP ALL 

THE FUNCTION PALL PRODUCES THE MATRIX OF ALL PERMUTATIONS OF 
ORDER N THE FUNCTION PERM WHICH IT USES PRODUCES THE B-TH 
PERMUTATION OF ORDER N BY A METHOD DUE TO L.J.WOODRUM. 

THE FUNCTION PER EMPLOYS RECURSIVE DEFINITION , AND PRODUCES 
ALL PERMUTATIONS BY A METHOD MUCH FASTER THAN THAT USED IN 
THE FUNCTION PALL. THE PERMUTATIONS ARE PRODUCED IN THE 
OPPOSITE ORDER. 

VPALLIU1V 

V Z+PALL N-,I 
[1] Z*-((lN),N)pO 
[2] i>l 

[3] ZLlil+N PERM I 
[4] ->3x( !N)>I+I+1 
V 

VPffiWLDJV 

V Z-rA PERM B',I\Y 
CI] H-pZ-*-l + (<t>i4 )T5-1 

[2] -»-OxiO=I-<-I-l 

[3] Z[I]^Z[Y]+Z[I]<Z[J^I+i4-I] 

[4] -2 

V 

VP£i?[Q]V 

V P+PER M;X',YiZ 
[1] +OxiM = P*- 1 1 pi 
[2] Z+PER M-l 

[3] P+\X+0 

[4] -+Qx\M<X+-X + l 

[5] Y+(~(\M)eX)\Z 

[6] YliXl+M 

[7] P+((X*lM-l),M)p(,P),,Y 

[8] +4 
V 

PALL 3 

12 3 

13 2 
2 13 

2 3 1 

3 12 
3 2 1 

TIME 
3 7 

Z+PALL 3 

TIME 
49 

Z+PALL 5 

TIME 
25 10 

Z+PER 5 

TIME 
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DASSOC 



THE FUNCTION ASSOC TESTS ANY PUTATIVE GROUP MULTIPLICATION 

T A A ^ L lr*irr,i ASSUMING GR0UP EL *MENTS M P9 M) F OR AS SO C I AT IV I TY 
AND YIELDS A VALUE 1 IF IT IS ASSOCIATIVE, OTHERWISE 



VASS0CIU1V 
V Z+ASSOC M 
Cl] Z+-A/ ,MIM;1=MI ;M1 

V 

M<-(\5)<\>5 5pi5 

M 

2 3 1+51 

3 4 5 12 

4 5 12 3 

5 12 3 4 
12 3 4 5 

TIME 
13 

ASSOC M 
1 

TIME 
9 

Af-f-0 10 0<)W 

A/ 

2 3 4 5 1 

3 4 5 12 
5 12 3 4 
5 12 3 4 
12 3 4 5 

ASSOC M 


TIME 
10 

Af«-?10 lOplO 

pA/ 
10 10 

^TAfff 
3 

45S0C* A/ 


2TA/ff 
4-5 
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)LOAD 1 NEWS 
SA VED l o , 4 4 „ 8 07/12/68 

DESCRIBE 

THIS WORKSPACE PROVIDES INFORMATION ABOUT THE OPERATION AND 
USE OF API. THE FUNCTIONS OF INTEREST TO THE USER ARE 

APLNOW, INDEX, PRINT, AND SCHEDULE. 

APLNOW TAKES AS ITS SINGLE ARGUMENT A THREE-ELEMENT VECTOR 
REPRESENTING A DATE, AS MONTH, DAI, YEAR. APLNOW PRINTS 

NOTES ON THE STATUS OF THE APL SYSTEM; FOR INSTANCE 
RECENTLY ADDED FEATURES, TEMPORARY RESTRICTIONS , OR ADVICE 
ON PROGRAMMING OR TERMINAL OPERATION. ONLY THOSE NOTES 

ENTERED INTO APLNOW ON OR AFTER THE DATE GIVEN AS AN 
ARGUMENT ARE PRINTED. 

INDEX TAKES NO ARGUMENT. IT PRINTS INDICES, DATES, AND THE 

FIRST FEW WORDS OF EACH NOTE IN APLNOW. 

PRINT TAKES AS ITS SINGLE ARGUMENT THE INDEX (AS INDICATED 
BY THE INDEX FUNCTION) OF A NOTE. FROM APLNOW, AND PRINTS THE 
NOTE. 

SCHEDULE TAKES NO ARGUMENT. IT INDICATES THE REGULAR DA T LY 
APL SCHEDULE, AND ALL ANTICIPATED DEVIATIONS FROM THE NORMAL 
SCHEDULE* 
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Exclusive or 3. 8 
Execution mode 2.5 3.16 
Execution, order of 

see Order of execution 
Expand 3.30 3.39 3.43 A. 13 
Exponential 3.6 

Exponential form 3.2 4.2-3 A. 1 
Expression, compound 3.3 3.13 

Factorial 3.6 3.8 3.15 A. 3 

Floor 3.6-7 

FNS 2.7 2.25 3.22 

Function name 2.17 3.2 3.10 3.23 

Function definition 3.9-10 3.16-18 
A. 4-6 

Functions 
see Circular, Defined, Dyadic, Halted, 
Library, Locked, Mixed, Monadic, 
Pendent, Primitive, Recursive 
definition, Scalar, Suspended, 
System dependent 

Fuzz 3.7 



Gamma function 3 
Gauss-Jordan elimination 
Global object 2.2 
Global variable 2 
Grade up and down 
Graph 4.2 4.4 
Greater 3.6 3.8 
Greatest common divisor 
GROUP 2.7 2.11 2.16 
GRP, GRPS 2.7 2.26-27 



B.10 
2.14-17 3. 
11-12 2.26 
3.39 3.45 



,23 
3. 



12 A. 3 



A. 4 
2.26 
3.22 



B.5 



Halted function 2.3 2.19 2.27-28 
Header 3.12 3.14-17 A. 3 
Hexadecimal number B.8 
Homonyms 2.3 2.15 3.22-23 
Hyperbolic functions 
see Circular functions 



I-beam functions 3.20 3.48-50 
Identity element table 3.35 
IMPROPER LIBRARY REFERENCE 2.7 

2.28 
INCORRECT COMMAND 2.5 

2.17-19 2.24-32 
INCORRECT SIGN-ON 1.8 
Index 3.26 3.39 
INDEX ERROR 3.4 3.31 
Index generator 3.9 3 
Indexing 3.26 3.31-34 
Index of 3.39 3.44 
Index origin 2.17 3 
3.5 3 



2.23-24 



2.7 2.9-10 2.13 

2.7 

3.35 
,39 A. 2 
A. 14-15 



Inner product 

table 3.37 
Input 

character 3.25 

escape from loop 3.25 

evaluated 3.2 4 

position 1.7 2.3 
Input and output 3.23-26 
Inquiry command 1.7 2.5 

action and notes 2.25-29 

table 2.7 
Insert by backspacing 3.3 
INTERRUPT 1.1 3.4 



33-34 A.! 
34 3.36 



A. 9 



6 
25 



Interrupt 2.3 2.8 3.19 
Iota 

see Index generator, Index of 
Iteration counter 3.12 



Key 1.7 2.3 

Keyboard 1 . 3 
locked 1.5-7 2.31-32 
unlocked 1.9 2.4 2.31 

Keying time 3.49 



3.24 



Label 3.16 

Lamination 3.26-27 

LENGTH ERROR 3.4 3.34 4.3 

Less 3.6 3.8 

LIB 2.7 2.28 

Library 2 . 1 

see Private, Public 
LIBRARY 1 4.1 

ADVANCEDEX B.1-12 

APLCOURSE 4.5 

NEWS B.13 

TYPEDRILL 4.7-8 

WSPNS 3.33 4.6 
Library control command 2.5 2.19-21 
2.22-24 



action and notes 

table 2.7 
Library function 2.4 
Library number 2.13 
LIBRARY TABLE FULL 2.8 
Line width 2.19 
List, construct and use 
LOAD 2.7 2.19 4.2 
Local variable 2.2 
Lock 2 . 3 
Locked function 
Locked keyboard 
Logarithm 3.6 
Logical function 3.5 
Logical result A. 2 



4.1-8 
2.20 



B.3 



3.12 3.22 



3.5 
1.4- 



.9 
2.3 

3.8 



,18 
2.30-32 



Magnitude 3.6-7 
Material implication 3. 
Mathematical statements 
Matrix 3.26-28 3.34-36 

Hilbert B.10 
Matrix divide 3.46 
Matrix inverse 3.46 
Maximum 3.3 3.7 3.35 
Membership 2.27 3.39 
Message 1.7 2.18 
MESSAGE LOST 2.7 
Minimum 3.6 3 . 35 
Minus 3.2 3.6 3, 
Mixed functions 3 

names 3.5 

sample A. 10-15 

table 3.39-40 
Monadic functions 3.6-i 
Monadic transpose 3.41 
MSG, MSGN 2.7 2.30-31 



3.1 

A. 7 



A. 15 



A. 9 
3.45 
2.29-30 
2.30-32 

35 
36-47 



A. 15 



3.29 3.46 



Names 2.2-3 2.12 2.16-17 2.20-21 
3.2 3.9 3.12 
active and latent referents 3.22-23 
to obtain lists of 2.25-28 

Nand 3.6 3.8 3.35 

Natural logarithm 3.6 

Negation function 3.2 

Negative number 3.2 3.6 A.1 

NONCE 3.4 3.27-28 

NO SPACE 2.8 

Nor 3.6 3.8 3.35 

Not 3 . 6 



Not equal 3.6- 8 3.34 

Not greater 3.6 3.8 3.35 

NOT GROUPED, NAME IN USE 2.7 2.17 

Not less 3.6 3.8 3.35 

NOT SAVED, THIS WS IS wsid 2.7 2.24 

NOT SAVED, WS QUOTA USED UP 2.7 2.22 2.24 

NOT WITH OPEN DEFINITION 2.7 2.14 2.22 

2.24 3.18 
NUMBER IN USE 1.8 2.7 
NUMBER LOCKED OUT 1.8 2.7 
NUMBER NOT IN SYSTEM 1.8 2.7 
Number of terminals connected 3.49 
Numbers 3.2 3.5 3.9 3.25 

OBJECT NOT FOUND "2.7 2.14 

Occurrences B.4 

OFF 2.7 2.8-9 

Operator 1.3-4 1.7 

OPR , OPRN 1.7 2.7 

Or 3.5-6 3.8 3.35 

Order of execution 3.3 

compound expression 3 

defined function 3.10 
ORIGIN 1.6 2.7 2.17 
Out of 3.35 

Outer product 3.5 3.34 
Output 2.1 2.18 3.23 

array 3.34 

fixed point 4. 2 

heterogeneous 3.25 

maximum digits 2.18 
Over strike 3.3-4 3.18 
3.42 3.45 



2.29 2.31-32 2.34-35 



.46 
A.1 



3.33 4.6 

3.37 
J. 25 



3.25 3.36 



B.11 



Parentheses in expression 3.3 

Parenthesis, right 1.8 2.6 

Password 1.7 2.3 2.7-8 2.19 

PCOPY 2.11 2.15-16 

Pendent function 2.3 2.27 3.20 

Permutation 3.33 3.38 A. 8 A. 14 

Pi times 3.6 

Plus 3.6 3.35 

Polynomial B.6 

Ports 1 . 1 

PORTS 2.7 2.29 

Power 3.6 3.35 

Precision of numbers 2.18 3.5 

Primitive functions 3.1 3.6 3.13 3.39 

names 3.5 

see Mixed, Scalar 
Printing element 1.1-3 
Private library 2.2 2.20 
Programming examples B.1-12 
Protecting copy command 2.11 2.16 
Public library 2.2 2.20 4.1 

Quad 3.24-25 3.49 
Quotation mark 3.2 
Quote quad 3.25 3.49 

Radices 3.43 

Random 3.6 3.46 A. 15 

RANK ERROR 3.4 3.34 4.3 

Rank of array 3.26-28 A. 14 

Ravel 3.28-29 3.39 

Reciprocal 3.6 

Recording terminal 1.3 2.6 2.21 2.29 

2.31-32 
Recursive definition 3.15 B.7 B.11 
Reduction 3.5 3.34-35 A. 9 
Representation 3.44 A. 13 
Request button on 1050 terminal 
RESEND 1.7 3.4 
Reshape 3.29 3.39 A. 7 



1.8 



2.1 2.19 3.19-22 



3.22 



Residue 3.6-7 3.35 

Response 1.8-10 2.5-6 2.9 A.1 

table 2.7 
Results 3.2 3.13-14 
Return 1.5-6 3.3 
Reverse 3.39 3.42 A. 12 
Revise 3.16 
Rho 

see Reshape, Size 
Roll, 3.6 

Rotate 3.39 3.41 A. 12 
Row 3.31-33 3.36 3.43 A. 7 

SAVE 2.7 2.19-23 

Scalar 3.2 3.27 3.37-38 3.41-43 

Scalar functions 3.5-9 

extend to arrays 3.34-36 

sample A. 2 

table 3.6 
Security 2.3 
Semicolon 3.12 3.25 
SETFUZZ 3.7 4.7 
SI, SIV 2.7 2.27-28 3.19-22 
SI DAMAGE 3.20 
Sign on 1 .7-9 2.7 
Signum 3.6 A. 3 
Sine 3.6 A. 2 

Sine, cosine, tangent table A. 11 
Sinh 3.6 

Size 3.5 3.28 3.39 
Spaces 2.5-6 3.2 
Specification 3.1 

multiple 3.47 
State indicator 
3.50 A. 5 

with local variables 
Statement 3 . 1 

end of 3.3 

invalid 3.3 3.5 A. 2 

number 3.9-10 3.16-17 
Statistical calculations 
Stop control 3.18 3-20 
Storage 2.1 2.21 3.46 
Store workspace 2.22-23 
Suspended function 2 . 3 
SYMBOLS 2.19 
Symbols 3.5-6 3.24-25 
SYMBOL TABLE FULL 3.4 
SYNTAX ERROR 3.4 
System command 2.1 2.4-6 

during function definition 

table 2.7 
System dependent function 

table 3.49 
SYSTEM ERROR 3.4 
System information 1.8 3.48-50 

Tabular output 4.3 
Take 3.39 3.45 
Tangent 3.6 A. 2 
Tanh 3 . 6 
Teaching 2.11 
Telephone number 1.4 
Terminal 

table of features and options 1.2 

1050 1.1 1.4 1.6-7 

2740 1.4-5 
2740-1 1.1 

2741 1.1 1.4-5 2.3 
Terminal control command 2.5-8 

action and notes 2.8-11 

table 2.7 
Terminal, sample session at A. 1-15 
Terminal modes 2.5 



2.11 



2.27 3.19-20 3.50 



3.39 3.45 



18 
.18 

2.4 2.27 3.48-50 



Time 1.8 1.10 2.8 3.48-50 B.7 
Timer on 1050 terminal 1.7 
Times 3.6 3.34-35 
Time, student response 3.49 
Trace 3.15 3.18 3.20-21 A. 3 
Transmission signal 1.5-6 
Transpose 3.38-42 A. 10-11 
Transposition table 3.41 
Trigonometric functions 

see Circular functions 
Trouble report 1.8 2.5 

table 2.7 
Typewriter entry 1.5-6 3.2 3.24 A.1 

User code 1.10 2.25 

Value 3.10 3.13-14 3.16 3.25 

3.43 3.47 
VALUE ERROR 3.4 3.14 
Variables 

local and global 2.2 3.12 3.22 

names 2.1-2 2.16-17 3.22-23 

value 3.1 3.13 3.33 
VARS 2.7 2.26 3.22 
Vectors 3.8-9 3.26-27 3.35-37 A.1 

mixed functions apply 3.38 

numerical and character constant 3.2 A.1 

scalar functions apply 3.8 



WIDTH 2.7 2.18 3.25 4.6-7 
Work session 

forced end 2.6 

to end 1.9-10 2.8-11 

to start 1.7 2.8 
Workspace 1.7 2.1-2 

activate 2.13-14 

active 2.1 2.6 2.12-13 2.20 2.25 

capacity 2.1 

clear 1.9 2.5 2.13 

continue 1.9 2.6 2.21 

identification 2.13 2.20 2.23 2.28 

identification change 2.18-20 

index origin 3.33 

information transfer between 2.11 

in libraries 4.1 

name 2.2-3 2.13 

purge an active 2.21 

replace stored with active 2.22 

stored 2.3 2.12-16 2.20 
Workspace control command 2.5 2.11 

action and notes 2.13-19 
WS FULL 2.7 2.15 3.4 
WSID 2.7 2.18 2.28 
WS LOCKED 2.7 2.14 
WS NOT FOUND 2.7 2.14 2.24 

Zero of a function B.9 
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